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Preface 



The Symbolic Programming System permits the pro- 
grammer to code in a symbolic language that is more 
meaningful and easy to handle than numerical machine 
language, sps automatically assigns and keeps a record 
of storage locations and checks for coding errors. By 
relieving the programmer of these burdensome tasks, 
SPS significantly reduces the amount of programming 
time and eflFort required. 

This manual is intended to serve as a reference text 
for 1620 SPS m and 1620-1443 sps hi. It assumes the 
reader is familiar with the methods of data handling 
and the functions of instructions in the ibm 1620 Data 
Processing System. For those without such knowledge, 
information may be found in the following publications : 

IBM 1620 Central Processing Unit, Model 1 (Form 
A26-5706) 



IBM 1620 Central Processing Unit, Model 2 (Form 
A26-5781) 

IBM 1620 Input/Output Units (Form A26-5707) 
IBM 1620 Data Processing System, Model 2 Binary 
Capabilities and Index Registers (Form A26-5764) 

Machine Requirements 

The minimum machine and special feature require- 
ments for assembling with 1620 sps hi are as follows: 

1. 1620 Data Processing System with 20,000 positions 
of core storage. 

2. 1621 Paper Tape Unit or 1622 Card Read-Punch. 

3. Indirect Addressing ( standard feature of 1620-2 ) . 
In addition to the above requirements, the 1443 Printer 
is required when assembling with 1620-1443 sps hi. 
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Introduction 

The SPS III Programming System may be divided into 
the symbolic language used in writing a program, the 
library containing the subroutines and linkage instruc- 
tions (macro-instructions) that may be incorporated 
into the program, and the processor that is used to as- 
semble the user s programs. 

Symbolic Language 

Symbolic language is the notation used by the pro- 
grammer to write (code) the program. The program 
written in sps language is called a "source program." 
This language provides the programmer with mne- 
monic operation codes, special characters, and other 
necessary symbols. The use of symbolic names (labels ) 
makes a program independent of actual machine loca- 
tions. Programs and routines written in sps language 
can be relocated and combined as desired. Routines 
within a program can be written independently with 
no loss of eflficiency in the final program. Symbolic in- 
structions may be added or deleted without reassigning 
storage addresses. 

Macro-instructions 

The macro-instructions that are written in a source pro- 
gram are commands to the processor to generate the 
necessary linkage instructions. Linkage instructions 
provide the path to a subroutine and a return path to 
the user's program. These subroutines may be any of 
seventeen ibm Library subroutines like floating divide, 
square root, and arctangent; or special subroutines pre- 
pared by the user. The ability to process macro-instruc- 
tions simplifies programming and further reduces the 
time required to write a program. 

Processor Program 

After a source program is written, it is punched into 
cards or into paper tape. The source program is then 
assembled into a finished machine language program 
known as the object program. 

Assembly is accomplished by the sps hi Processor 
program. The function of the processor is to translate 
the s)niibolic language of the programming system into 
the machine language of the 1620. The translation is one 
for one — the processor produces one machine language 
instruction for each source statement (except macro- 
instructions). 



Symbolic Programming 

Symbolic programming may be defined as a method 
wherein names, characteristics of instructions, or closely 
related symbols are used in writing a program. The core 
of the symbolic language is the operation code, sps per- 
mits the programmer to write ( code ) in a more simple, 
familiar language and does not require as detailed ma- 
chine knowledge because, in coding the program, the 
programmer uses operation codes that are in easily re- 
membered mnemonic form rather than in the numerical 
language of the machine. Operation codes are of three 
types; Declarative, Imperative, and Control. 

Declarative Operation Codes 

Declarative operation codes are used for assignment of 
core storage for input areas, output areas, and working 
areas. The assigned areas are utilized by the object pro- 
gram and may contain the data to be processed and /or 
the constants ( numerical or alphameric characters ) re- 
quired in the object program when the data is processed. 
Declarative statements never generate instructions in 
the object program, but may generate constants that are 
assembled as part of the object program. 

Imperative Operation Codes 

Imperative operation codes specify the operations or 
instructions that the object program is to perform. In 
this group are included all arithmetic, branching, and 
input/output statements. Most statements on the cod- 
ing sheet prepared by the programmer are of this type. 
These statements are translated one for one and are 
assembled as the machine language instructions of the 
object program. 

Control Operation Codes 

Control operation codes are commands to the processor 
that provide the programmer with control over portions 
of the assembly process. Instructions of this type do not 
normally generate instructions in the object program. 

The actual and mnemonic operation codes within 
these categories are presented under programming 
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Coding Sheet 

The programmer enters all information relevant to the 
coding of the source program and subsequent assembly 
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of the object program on coding sheet, Form X26-5627 
( Figure 1 ) . Figure 2 shows a sample input card, Form 
J59692. The format of the input card or paper tape 
record follows the headings on the coding sheet. In 
paper tape, the first punching position of a record is 
said to be column 1. The card columns assigned to a 
single heading are referred to as a field. Following is an 
explanation of the headings in the order of their ap- 
pearance on the sheet. 

Heading Line 

Space is provided at the top of each page for the name 
of the Program, Routine, and Programmer, and for the 
date. This information does not constitute part of the 
source program language and is not punched. 

Page Number (Columns 1-2) 

A 2-digit page number is entered to maintain the order 
of the program sheets. This entry (normally numerical) 



becomes the first two digits of each statement that is 
punched from the sheet. 

Line Number (Columns 3-5) 

A 3-digit line number is entered on the sheet to main- 
tain the sequence of the statements coded. The first 20 
lines on each sheet are prenumbered 010, 020, 030, etc., 
through 200. At the bottom of the sheet, six nonnum- 
bered lines are provided for inserts or for continuing 
the line numbering. The inserted statement should be 
numbered so that it falls sequentially between the state- 
ments immediately preceding and following it. The 
arrangement of the prenumbered lines, 010, 020, etc., 
permits up to nine statements to be inserted between 
any two statements. After the cards for each of the lines 
are punched, they should be placed in correct numerical 
order. 



1620/1710 Symbolic Programming System 
Coding Sheet 
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Figure 1. 1620/1710 SPS Coding Sheet 
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Figure 2. SPS Source Program Card 



Label (Columns 6-11) 

The label field represents the machine location of either 
data or instructions. The field may be left blank or may 
be filled with a symbolic address. Only the data or in- 
structions that are referred to elsewhere in the program 
need have a label. 

A label may consist of up to six alphameric characters 
beginning at the left-most position in the label field. At 
least one of the characters must be alphabetic or one 
of four permissible special characters, namely, the equal 
sign ( — ), slash symbol (/), at sign (@), and period 

(.)• 

The best labels to select are those that are mne- 
monically descriptive of the area or instruction to which 
they are assigned. Labels that have an obvious mean- 
ing not only provide easily remembered references for 
the original programmer but also assist others who may 
assume responsibility for the program. 



Operation (Columns 12-15) 

The four-position operation field contains the actual 
two-digit numerical operation code or the mnemonic 
representation of the operation code to be performed. 
If the first character is numerical, no check of the oper- 
ation code occurs and the numerical parts of the two- 
digit internal representation of the first two characters 
is taken as the operation code, that is, if the program- 
mer writes 4BNF, the resulting operation code is 42. 



In either case, the first character of the operation code 
must start in the leftmost position, column 12, of the 
operation field. Listings of permissible mnemonic codes 
and actual operation codes are shown under program- 
ming THE 1620 USING SPS. 



Operands and Remarks (Columns 16-75) 

The operands and remarks field is used to specify the 
information that is to be operated upon and may con- 
tain, if desired, any additional remarks concerning the 
statement. 

For declarative operation statements, the first oper- 
and usually defines the length. The remaining operands, 
if present, specify constants, an address, and remarks. 

For imperative operation statements, the operands 
and remarks field contains, at most, four items: three 
of these are operands and the fourth, remarks. The first 
two operands may be the symbolic or actual address 
of data or instructions, the P and Q portions of the in- 
struction. The third operand, which should be numeri- 
cal, is called the flag indicator operand and is used to 
set flags in the assembled instruction. The final item 
consists of the remarks associated with each statement. 
Imperative statements need not contain all four items. 
Any one or more than one may be omitted. 

A control operation statement normally consists of 
only one operand. 
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Statement Writing 

Certain rules must be observed in writing or coding the 
statements that make up the source program. This sec- 
tion contains rules that apply to the statements and their 
elements, rules governing the length and types of state- 
ments, use of special characters, the flag indicator oper- 
and and immediate (Q) operand, types of addresses 
used as operands, and address adjustment by arithme- 
tic, a method that relieves the programmer of consid- 
erable eflFort and reduces the number of symbols re- 
quired for a source program. 

Statements 

Symbolic statements are classed according to the oper- 
ation code they contain, and thus are designated De- 
clarative, Imperative, or Control statements. In addi- 
tion to the page and line number, a statement may con- 
tain a label, operation code, operands, and remarks. 
No statement in the source program may exceed 75 
characters in length. Since page number, line number, 
label, and operation require 15 positions, the operands, 
and remarks field may not exceed 60 characters. In the 
case of the paper tape sps, the end-of-line character is 
considered to be part of the operands and remarks field. 

Use of Special Characters in Statement Writing 

The comma, asterisk, end-of-line character, blank, at 
( @ ) sign, and dollar sign are special characters which 
possess distinct meanings in the writing of source pro- 
grams. Their use as well as that of the special characters 
used as operators for address adjustment are explained 
in detail in this section. 

COMMA 

The comma is normally used to separate items in a 
statement. The term item refers here to parts of the 
operands and remarks field, such as the P and Q oper- 
ands, the flag indicator operand, remarks, length, con- 
stants, etc. An imperative statement may consist of four 
items: the P and Q operands, the flag indicator oper- 
and, and remarks, but need not contain all four items. 
Any one or more than one may be omitted. 

If one item is omitted and more items follow, the 
comma that normally follows the omitted item must be 
present. For example, if the flag indicator operand is 
omitted but remarks are present in the instruction, the 
format of the field will be: 



L>n« 
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II . IJ 
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All imperative statements that contain remarks must 
include three commas in the operands field, even when 
the operands are omitted. During assembly, the omitted 
P or Q operands will be replaced by zeros in the P or Q 
portion of the assembled instruction. 

Commas indicating omission need not be present in 
statements in which the last item(s) is omitted. For 
example, in the statement in which both the flag indi- 
cator operand and remarks are omitted, no commas 
need be used following the second operand. 
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Statement 010 which is a halt operation requires three 
commas ( , , ,) in front of the remarks, to take the place 
of the P, Q, and flag indicator operands. In statement 
020, the first two commas set off the P and Q operands, 
whereas the third comma takes the place of the omitted 
flag indicator operand. The number of commas required 
for declarative statements may be one or two as ex- 
plained under declarative operations. 

ASTERISK 

The asterisk has three uses: in writing comments (only), 
as an operand or term of an operand, and in address 
adjustment. 

Lines of descriptive information may be inserted in 
the program by placing an asterisk ( * ) in column 6 of 
the label field. Comments then may be written in col- 
umns 7 through 75. Comments inserted in this way will 
appear in the symbolic output, but will not affect in 
any way the operation of the program. A comment 
statement does not produce an entry in the object pro- 
gram. 
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Statements 010 and 020 are remarks that do not gener- 
ate instructions. 

The asterisk is used as the first character or term of 
an operand in an imperative statement and is inter- 
preted by the program as the address of the high-order 
(leftmost) position of the address of the instruction. It 
may be used as any term of the operand to indicate the 
high-order (leftmost) position of the address of the 
instruction. 

When the asterisk is used in address adjustment as an 
operator, it indicates to the processor that a multiplica- 
tion must be performed in order to adjust the address. 

PARENTHESES 

Parentheses are used to enclose the integer that specifies 
which index register is to be used in modification of the 
operand. 
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END-OF-LINE CHARACTER 

An end -of -line character (E) is required on source 
statements that are to be processed on paper tape. Use 
of this character allows statements to be located on the 



tape immediately adjacent to each other, with no inter- 
vening blank characters. The statements are in "free" 
form; that is, they are not assigned a fixed number of 
positions. 

Source statements that are to be processed in punched 
card form do not require an end-of-line character; the 
remainder of the line is left blank and this is recognized 
by the processor as the end of the statement. 

When the end-of-line character is punched in a card 
for off-line conversion to paper tape, it is represented 
by a 12, 5, 8 punch combination. 

BLANK CHARACTER 

A blank character in operands of the source statements 
is ignored by the processor except in dac statements 
( alphameric constants ), in which blanks are considered 
valid characters. In effect, the statement is condensed 
before it is processed. 

Because blanks are ignored by the processor, the pro- 
grammer, to achieve clarity on his coding sheets and 
output listing, may write his statements in modified 
"fixed" form as shown in the example at the bottom of 
the page. In this example, columns 16, 36, and 57 are 
arbitrary choices for the locations of the operands. The 
comma following or replacing the P operand may be 
in any column from 16 through 35; the comma follow- 
ing or replacing the Q operand must be in column 56, 
the position preceding the flag indicator operand. 
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Blanks are not permitted within a flag indicator oper- 
and. For paper tape input, this operand must begin 
immediately following the second column and must be 
immediately followed by a comma or end-of-line char- 
acter. For card input, the flag indicator operand can 
be followed by a comma, record mark, or blanks in the 
remainder of the card. A blank or blanks in the address 
operand of a declarative statement, when set off by 
commas, is interpreted by the processor as a zero ad- 
dress. 

''at ' SIGN 

When the * at" sign ( @ ) is used as part of a constant be- 
ing defined by a dc, dsc, or dac statement, a record mark 
(4r) is created by the processor and inserted into the 
constant in place of the @. Specific rules for use of the 
@ are covered under declarative operations 

DOLLAR SIGN 

The dollar sign ( $ ) is used in an operand to instruct the 
processor that the symbolic address in an operand has 
a specific heading character. The $ is written between 
the heading character and the symbol. For example, in 
an operand the heading character "5'' and the symbol 
"sum" appear as 5$sum. For additional information on 
the use of the $, refer to head-heading in the Control 
Operations section. 

Operands 

FLAG INDICATOR OPERAND 

The flag indicator operand specifies the positions that 
are to be flagged in the assembled instruction. These 
positions are numbered from left to right, 0 through 11, 
and must be listed sequentially. For example, if posi- 
tions 2, 7, and 10 are to be flagged, the flag indicator 
operand should be coded 2710, not 2107. All positions 
may be flagged, if desired. The operand then will be 
coded 01234567891011 and must be written in that 
order. 

Normally, no flags are set when the flag indicator op- 
erand is omitted. However, if the flag indicator operand 
is omitted from all immediate instructions, except tdm, 
a flag is automatically set in position Q7. If the operand 
is present, only the positions indicated are flagged. 

The flag indicator operand can be used to insert a flag 
over the units position of the P and Q addresses, if the 
source program is written for a 1620 or 1710 that has 
Indirect Addressing. 

IMAIEDIATE (q OPERAND) 

With immediate-type instructions such as Add Im- 
mediate (am), Subtract Immediate (sm), and with 
actual operation codes that begin with the digit 1, the 
Q operand represents the actual data to be used by the 



instruction. It may be absolute or symbolic as previous- 
ly defined. High-order zeros of absolute data may be 
eliminated. 

During assembly, the processor automatically places 
a flag over position Q7 of an immediate instruction un- 
less a flag indicator operand ilidicates otherwise. For 
example, the statement 
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causes the numbers 10023 to be subtracted from the 
field called total because the flag that terminates the 
field to be subtracted is automatically placed over po- 
sition Q7. However, the statement 
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will cause only the number 23 to be subtracted from 
the field called total because the flag indicator oper- 
and directs that the field terminating flag be placed 
over position Qk, rather than Q7. There is one excep- 
tion to this rule: a Transmit Digit Immediate instruction 
(tdm, code 15) does not require a flag; therefore, none 
is automatically set by the processor. 

mask digit OPERAND 

A mask digit operand is required to specify the mask 
digit for the Branch on Mask and Branch on Bit in- 
structions. The D in the following examples shows the 
position of the mask operand in the source statement. 
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which assembles to: 91 PPPPP DQQQQ 
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which assembles to: 90 PPPPP Y^qC^^q 

The mask operand may be symbolic or absolute. The 
P, Q, and flag operands are processed in the same man- 
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ner as for other instructions. If the mask operand is an 
absolute value, the units character replaces the Q7 
character of the Q operand. For example: 
Given: 
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will assemble to: 91 12344 13456 

If the mask operand is a symbol, the units position 
of the symbolic address will be inserted in the Q: po- 
sition of the assembled instruction. For example: 
Given: 



causes the data in storage location 12251 to be added 
to the data in storage location 03684. 

SYMBOLIC ADDRESS 

A symbolic address is the name assigned by the pro- 
grammer to the location of an instruction or a piece of 
data. A symbolic address is valid only if it is defined 
(given an actual numerical value) by a declarative 
statement somewhere in the source program or if it is 
used as the label of an instruction. Symbolic addresses 
may contain from one to six characters (letters, digits, 
or special characters) with the following restrictions: 

a. At least one character must be nonnumerical. 

b. The only permissible special characters are: equal 
sign ( = ), slash symbol (/), at sign (@), and 
period (.). 

It should be noted that blanks have no meaning 
within a symbol because they are eliminated during 
assembly. 

The example shown below contains both an actual 
address and a symbolic address. 
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will assemble to: 91 12344 53456 

Types of Addresses Used as Operands 

Operands assembled by the processor may be of three 
types: actual, symbolic, and asterisk. The individual 
applications for a particular type of address are de- 
scribed in the section programming the 1620 using 

SPS. 

ACTUAL ADDRESS 

An actual address consists of five digits 00000-19999 
for a standard capacity machine and is, as the name 
implies, the actual core storage address of a piece of 
data or an instruction. High-order zeros of an actual 
address may be eliminated. For example, the statement 
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In this example, the data in the field whose actual 
address is 12251 is added to a field whose address is 
the symbolic name total. 

ASTERISK ADDRESS 

When the asterisk is used as the first character of an 
operand in an imperative operation, it is interpreted 
by the processor as meaning the address of the high- 
order (leftmost) position of the instruction itself. For 
example, the statement 
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indicates to the processor that the Q portion of the in- 
struction should contain the address of the instruction 
itself. This instruction is assembled as 44 01234 01876 
where start equals 01234 and the address assigned to 
the instruction is 01876. Thus, when executed in the ob- 
ject program, this instruction examines its own leftmost 
position (01876) for a flag and either branches to the 
instruction at location 01234 or continues, on the basis 
of the examination, to the next instruction located at 
01888. 
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when an asterisk (*) address is used with either 
declarative or control operations, it refers to the right- 
most position of storage last assigned by the location 
assignment counter of the processor ~ not to the left- 
most character of the instruction. For example, the 
statements 
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suit (adjusted address) that is over 5 digits, cannot be 
calculated by the processor. 

In using address adjustment, the programmer should 
be careful that insertions or deletions do not aflFect the 
adjusted address. For example, if a P operand in a 
branch (B) instruction refers to an address as * +48 
(i.e., branch to the instruction that follows the next 
three sequentially higher instructions), the program- 
mer must ensure that no new instructions are intro- 
duced within the three instructions to make the * +48 
incorrect. In this example the asterisk ( * ) is the left- 
most position of the instruction itself. 
Examples 



produce the instruction 

16 12045 70004^ 

Since record marks can be defined only in declara- 
tive operations, an imperative statement should be fol- 
lowed by a DC statement when a record mark is re- 
quired in the instruction. The rightmost position of the 
instruction is the rightmost position of storage last as- 
signed; therefore it is also the position where the =4= 
(constant) is stored. 
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Address Adjustment of Operands 

Address adjustment is used to tell the processor to 
arithmetically adjust the addresses in operands. It is 
permitted with all types of addresses: actual, symbolic, 
and asterisk, and is used to refer to a location that is a 
given number of positions away from a specific ad- 
dress. Use of this feature of the language reduces the 
number of symbols necessary for a source program. 

By writing a + (plus sign) for addition, — (minus 
sign) for subtraction, and * (asterisk) for multiplica- 
tion, immediately after the first or subsequent term of 
an operand (an asterisk as a term of an operand does 
not represent multiplication but mealis the address of 
the instruction, as previously explained), the program- 
mer indicates to the processor that the address is to be 
adjusted. 

Arithmetically adjusted operands may take the form 
of A ±: B ± C ±: D, where the terms A, B, C, and 
D may be numerical quantities. The number of terms 
in the operand is limited only by the size of the oper- 
and and remarks field. Thus the operalid A + B * C 
— D may be further adjusted by writing after the last 
term another term, E, e.g., A + B*C — D + E. 

In arithmetically adjusted operands, the opera- 
tion or operations of multiplication are always per- 
formed first, followed by the addition and subtraction 
required to calculate the adjusted address. Intermedi- 
ate results that are greater than 10 digits, or a final re- 



The operands shown will produce the adjusted ad- 
dresses, as indicated, provided the location 1000 has 
been assigned to the symbolic address alpha, the loca- 
tion 4 has been assigned the symbolic address L, and 
the instruction location ( * ) is equivalent to 2000. 

In some instructions such as the branch instruction, 
the Q address is not used, although a zero (00000) ad- 
dress is generated. Thus the instruction uses 12 storage 
positions. By using an * address in the following state- 
ments 
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the instructions are condensed, to eliminate four posi- 
tions of the unused ( zero ) Q address, and are stored as 

49136680161204570000 
whereas the statements 
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are stored as 

491366800000161204570000 

because the utiused Q address is not eliminated. In the 
first example, only four positions of storage are saved; 
however, a considerable amount of storage can be 
saved in a program that contains many instructions 
where the Q or both the Q and P portions of instruc- 
tions are unused. Because the * in the dorg statement 
( see CONTROL OPERATIONS ) refers to the rightmost po- 
sition of storage last assigned (Q^ of the B instruc- 
tion), * —3 is the address where the next instruction 
starts. 

By placing a minus sign in front of the first term of 
an operand, a flag (minus sign) can be inserted over 
the units position of the adjusted address. This feature 
of address adjustment can be used for inserting flags 
required for Indirect Addressing. However, an operand 
written as —0 (minus zero) does not insert the flag in 
the units position over the zero. When the minus sign is 
written in front of the first term in order to set a flag 
over the units position, other signs following the first 
term should be reversed so that the correct address is 
obtained. 



Operand Modification with Index Registers 

Any operand that cati be indirectly addressed may be 
modified with an index register. The index register is 
specified by placing the number of the index register 
in parentheses, as shown in the following examples , 
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either of which will be assembled as 
21 XXXXX XXXXX 
The number in parentheses must be an integer from 
0 to 7. The processor decodes the number and places 
the proper flags over the operands. In the second ex- 
ample, the A in the index register portion of the P 
operand is ignored by the processor; however, it may 
be included by the programmer as an aid in keeping 
track of the index register band currently selected. The 
processor decodes the rightmost numerical character 
within the parentheses as the index register number. 
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Programming the 1620 Using SPS 



This section describes the various steps to be followed 
in writing a program for the 1620 using sps. The 
material is divided into three categories: Declara- 
tive Statements, Imperative Statements, and Control 
Statements. 

Declarative Statements 

In programming the 1620, all records and any other 
data that is to be processed by the program must be 
assigned storage areas. Normally, all records and data 
to be processed consist of fields of known length and 
arrangement. Unless otherwise specified, areas are 
automatically assigned core storage locatiolis in the 
order in which they appear in the source statements. 

To assign addresses for instructions, constants, etc., 
the processor uses an address assignment counter. This 
counter is adjusted for each assignment made by the 
processor. If an address is assigned by the program- 
mer, the counter is not adjusted. 

The declarative statements provide the object pro- 
gram with the input/output areas, work areas, and 
constants it requires to accomplish its assigned task. 
These statements do not produce instructions that are 
executed in the object program. The entries, ds, dss, 
DAS, and DSB assign storage for work areas in the object 
program. The entries, dc, dsc, dac, dsa, and dnb usually 
assign storage, and also produce, in the object program, 
both the machine address of the area assigned and the 
constants that are to be stored in this area. Constants 
are then loaded with the object program. 

Declarative statements may be entered at any point 
in the source program. However, these statements are 
normally placed by themselves, preferably at the be- 
ginning or end of the program — not within the instruc- 
tion area. If not placed at the beginning or end, the 
programmer is required to branch around an area as- 
signed to data so the program will not attempt to exe- 
cute what is in a data area as an instruction. 

The declarative mnemonic operation codes and their 
description are as follows: 

Code Description 

DS Define Symbol (Numerical) 

DSS Define Special Symbol ( Numerical ) 

DAS Define Alphameric Symbol 

DC Define Constant (Numerical) 



DSC Define Special Constant (Numerical) 

DAC Define Alphameric Constant 

DSA Define Symbolic Address 

DSB Define Symbolic Block 

DNB Define Numerical Blank 

DS — Define Symbol (Numerical) 

A DS statement may be used to define symbols used in 
the source program (i.e., to assign storage addresses 
or values to symbolic addresses or labels ) and to assign 
storage for input, output, or working areas. A ds state- 
ment does not cause any data to be loaded with the 
object program. 

The length of the field is defined by the first oper- 
and. This operand may be an absolute value or a sym- 
bolic name. If a symbolic name is used, the symbol 
must previously have been defined as an absolute 
value, that is, it must have appeared in the label field 
in a statement of the source program preceding the 
one in which it is used. Address adjustment may be 
used with this operand. 

The address in core storage of the field being defined 
may be assigned by the programmer or the program- 
mer may let the processor assign the address. If the 
processor assigns the address, the statement is termi- 
nated after the first operand. If the programmer assigns 
the address, a second operand, which may be symbolic, 
asterisk, or actual, is used to establish the address of 
the field. Since data fields are addressed at their right- 
most (low-order) digit the processor assigns this po- 
sition as the address of the field. Address adjustment 
may be used with the second operand. If the second 
operand is symbolic, it also must previously have been 
defined. Addresses assigned by the programmer do not 
disrupt the sequence of addresses assigned by the 
processor. 

A DS statement may also be used to define a symbol, 
without assigning any storage, i.e., to define it as an 
absolute value. In this case, the first operand is omitted 
(or written as 0) and the second operand represents 
the value (may not exceed five digits in length). The 
second operand may be an actual value or a previously 
defined symbol. To define storage which will not be 
referred to symbolically, the label of the ds statement 
may be omitted. 
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The following statements define the field length only. 
When remarks are added to the statement, the field 
length must be followed by two commas. 
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example, the programmer assigns the 
field and excludes the field length (the 



first operand ) from the statement and replaces it with 
a comma. The following statements cause the processor 
to associate the address 12930 with the label sum: 
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Again, in this example, two commas are required 
when remarks form part of the statement. 

The following statement, which is similar to the one 
previously given, is assigned a value that is other than 
an address. 
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the processor assigns the leftmost position as the ad- 
dress of the field. If a second operand is assigned by 
the programmer, this address is assumed to be equiv- 
alent to the leftmost position of the field. A dss state- 
ment is normally used to define a storage area for in- 
put/output. The data in such an area may be moved 
during execution of the object program by a Transmit 
Record instruction which requires that an address as- 
signed to an area be that of the leftmost position. 

DAS — Define Alphameric Symbol 

The DAS statement is similar to the ds statement with 

two exceptions: 

1. The length specified by the first operand is auto- 
matically doubled by the processor to allow for 
alphameric data. Each alphameric character re- 
quires two storage positions. 

2. The address of the field, if generated by the pro- 
cessor, is the leftmost position of the field plus one. 
The position is always odd-numbered, as it must 
be with any alphameric field. 

The following example illustrates a das statement. 
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This statement defines the symbol fl as being equiv- 
alent to the value 17. Subsequent uses of this symbol 
are permitted because the symbol has been defined. 

It should be noted that an area defined by the proc- 
essor for a DS statement is always addressed at the 
rightmost position. However, to use this area for in- 
put/output, the leftmost digit must be addressed. This 
is done by using a dss statement in place of a ds state- 
ment or by address adjustment with a ds statement, 
which subtracts a number that is one less than the 
length of the area from the address of the area. In a 
previous example, where deltax was defined as having 
a field length of 7, the operand of another instruction 
to read numerical data into the deltax field should be 
written as deltax— 6. 

DSS — Define Special Symbol (Numerical) 

The DSS statement is similar to the ds statement with 
one exception: when the second operand is omitted, 



This statement defines an area for input/output that 
can contain 30 alphameric characters. The processor 
assigns 60 positions in core storage to accommodate 
alphameric coding. The omission of the second operand 
causes the processor to assign an address. During in- 
ternal transmission of a field which utilizes an input/ 
output area that is defined with a das, the area must be 
addressed at its rightmost position. In the example, the 
address may be achieved through address adjustment, 
i.e!, TITLE + 2*30— 2. 

DC — Define Constant (Numerical) 

The DC statement may be used to enter numerical con- 
stants into the object program, and, for ease of refer- 
ence, to assign names to the constants. The label field 
contains the name by which the constant is known, dc 
statements consist of three operands. The first operand 
indicates the length of the constant field; the second, 
the actual constant; the third, the storage address of 
the constant. The third operand is not used when the 
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programmer prefers to let the processor assign the 
storage address. The assigned address is the rightmost 
storage position of the constant. The leftmost storage 
position is the position over which the processor places 
a flag. 

Whenever remarks form part of a dc statement, three 
commas must be included in the statement. The first 
and third operands may be symbolic or actual They 
are subject to address adjustment. A symbolic address 
must previously have been defined to be valid. 

If the first operand (length of constant) is smaller 
than the constant, an invalid condition results. If it is 
larger than the constant, zeros are inserted to the left 
of the constant so that the number of zeros plus the 
number of positions in the constant equals the length 
of the field ( first operand ) . 

A constant that is a positive number will be stored 
in the form of an unsigned integer; a negative number, 
in the form of a signed integer*. A negative number has 
the minus sign written in front of the constant as part 
of the second operand. During assembly, a negative 
number produces a flag (minus sign) over the units 
position of the constant. 

If the constants 0100000 and —0004337769 are re- 
quired, they may be defined as follows: 



lin« 
) S 


Lolwl 


Dparation 

ij t$ 


Operands A Rcfnorki 

U M 75 30 )i 40 4S M 


t.V.f 




1>A . 


y.tJAo.oo.o 










Si2.f 




AC , 


7,jJ.0A0ji)Pr,J, COMMAS, fX>A. J^M/iA^/^fi, . . . . . 








1 1 1 1 » 1 1 1 1 1 1 1 1 1 J -l— J 1—1 ,1 (— I 1 t-l 1 I 1 1 .JL-i-J— 1 


0,3,0 




AC . 


ip.,rA3A77j6.9, . .-■ 














P C. . 


/Air,A3.3.7.7.6,9.y.9.3. COMMAS. f OA ,RjEMA,f^K,S. . . 



In both cases, constant 1 and constant 2, the length of 
field is greater than the constant, and the addresses of 
the constants are assigned by the processor. These 
constants will appear in the object program as 

0100000 

0004337769 

A record mark may be used in a constant but must 
be in the units position and must be written as the 
character @. The following example contains state- 
ments that: 

1. Store a record mark by itself as a constant. 

2. Store a constant 6 and record mark. 

3. Store a minus 0773 and record mark. 



Lir>« 
3 5 


Lob«l 


Op«rattoo 

1? IS 


Operandi & Remarks 

)« 20 n 30 3S 40 4S so 


1.1 <9 


ftHAAX. 


1>A , 


/,,^^^5"7;^7>ei■. A. REjCpRD, /iAM.K. PN,Ly, ...... 










0.}.0 




















AC, , 
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These constants appear in the object program as: 
0773 =1= 

A constant 7 with a flag (7) is generated by either 
of the following statements: 



line 

3 J 


Label 


Operorion 

1? 1$ 


Operondt & Remorlis 

li 70 n 30 35 40 4S SO 


0.' .0 


CMSX.Z 


AC, , 


J ,-7.y.yST0R,£ A 7. W/TM A /IA.6 










0|?,!> 






J.,7.,.».$rO^£, A 7 A. f,LAA 



A flag is always placed over a one-digit constant ( ex- 
cept a record mark), regardless of the sign. Therefore 
the programmer must use two positions to define a 
positive one-digit constant. 

Constants may not exceed 50 characters. The follow- 
ing statement generates a constant containing 50 zeros. 



Line 
3 S 


Lob«l 

4 II 


Operofion 
17 IS 


operands & Remorki 

MX K 30 3S • 40 4S SO 


«. 1 .0 




vc . 


s.o,.ai.,STo^.£ F.i fjy z£Ao.s . , 



To store a zero with a flag at location 00401, the fol- 
lowing statement can be used: 





Lobel 


OperoTton 
1? t$ 


Operondi & Remorks 






PA , 


J.f P.fAOJ^ $rOR£ A. Z£/tO kiTJt. A FXAO . 



Because a label is not included in this statement, the 
actual address ( 00401 ) must be u^ed by any other in- 
struction when referring to this constant. 

DSC — Define Special Constant (Numerical) 

The DSC statement is similar to the dc statement with 
two exceptions: 

1. When the third operand is omitted, the address 
assigned by the processor to the field is that of 
the leftmost position of the field. If the third 
operand is present, the address of the constant is 
assumed to be the leftmost position of the field, 
and the constant will be stored with its leftmost 
digit at this address when the object program is 
loaded. 

2. A flag is not placed in the leftmost position of the 
field. 



DAC — Define Alphameric Constant 

To define a constant consisting of alphameric data, the 
mnemonic dac is used. The dac statement is similar to 
the DC statement with three exceptions: 

1. The first operand (length) is automatically 
doubled by the processor to allow two storage 
positions for each alphameric character. 

2. The storage address of the constant is the address 
of the leftmost position plus one. This address 
must be an odd-numbered address to comply 
with the requirements for alphameric data stor- 
age. An odd-numbered address will automatically 
be assigned, if it is assigned by the processor. If 
it is specified by the programmer (as in line 020 
of the following example), the processor assigns 
the specified address and provides that the con- 
stant is stored beginning one position to the left 
of the specified address. In the latter case, the 
processor makes no test of whether or not the 
address is odd-numbered or whether the address 
(or the position to the left) has been previously 
assigned, 

3. High-order zeros are not automatically inserted 
in the constant by the processor, as in the case 
with a DC statement when the field length exceeds 
the number of characters. The number of char- 
acters including blank characters should not be 
greater or less than the specified length (first 
operand). When the rightmost position or posi- 
tions of the constant are blank characters, they 
should be followed by a comma or end-of-line 
character. For card input, the rightmost position 
must be followed by a comma or a record mark. 

Note: Only dac and dnb instructions may be used 
to insert blank characters into storage. 



Line 
1 $ 


Lobel 


Operolion 
U 1$ 


operandi & Remorki 

)« 70 » JO U 40 4S M 


0.1 .0 






















, , . , , ,9,0.1 , ST,0,».£, >, ,AL,P,H.A ,B,L,K.S. , . . 
















1^,^ , , AL PHA, FOH OUTPUT^ A^.^,^, ..... 










p,*,o 


CONST 


DAC 


i 3,, PE^LT ,AX^,0 , Op pfi, f ,S TAf^,E, C.N.S.T. , . . . 



In the example shown: 

1. Statement 010 uses 34 storage positions to store 
the 17-position constant ( deck 3478 punched ) . 

2. Statement 020 places 6 alphameric blanks into 
storage locations 00900 through 00911. Also, a flag 
is set in location 00900. 



3. Statement 030 records an alphameric record mark 
in storage. 

4. Statement 040 places a 13-position constant, in- 
cluding a record mark, in storage. 

A 50 -character alphameric constant (maximum 
allowable) occupies 100 positions of storage. A flag is 
set over the leftmost position of the field. Addressing 
this constant for internal field transmission requires the 
address output +50 * 2—2, where output is the sym- 
bol (label) which represents the leftmost address plus 
one. 

DSA — Define Symbolic Address 

The DSA statement may be used to store a series of up 
to ten addresses as constants, as part of the object pro- 
gram. These addresses can be used for instruction 
modification or for setting up a table of addresses 
through which the programmer may index to modify a 
routine. 

Each entry (symbolic or actual) in the operands 
field, with the exception of tlie last entry, is followed 
by a comma. The equivalent machine address of each 
entry is stored as a 5-digit constant. The constants are 
stored adjacent to each other with a flag over the high- 
order position of each. The label field of this state- 
ment must contain the symbolic name by which the 
table of constants may be referred to. An address at 
which this table is stored in core storage may not be 
assigned by the programmer nor may any remarks be 
included in the dsa statement. The address assigned 
by the processor is the address at which the rightmost 
digit of the first constant will be located. 

Note: If the last operand is followed by a comma, an 
additional zero address (00000) is assembled in the 
table. 

In the example that follows, symbols alpha, origin, 
and output are equivalent to addresses 01000, 00600, 
and 15000, respectively. 



Lin* 
J. 1 




Opararion 

1} IS 


Operandi & Remortu 

U » » » U 40 4) SO 








AL PHA* ORl GJ fij .i.2.BAfMT.PMJ.'.5.0 



The constants are stored as 

01000006000123414950 

t t 

(01200) 

(01204) 
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If the leftmost digit of these four constants is located 
at 01200, then the address equivalent to table will be 
01204, the location of the rightmost digit of alpha. 

DSB — Define Symbolic Block 

A DSB statement is used to define an area of storage for 
storing a numerical array. A dsb statement does not 
cause any data to be loaded with the object program. 
The label of this statement is converted to the address 
at which the first element of the array is stored (i.e., 
the rightmost position of the first element). The first 
operand indicates the size of each element, the second, 
the number of elements. 

Either or both operands may be symbolic or actual. 
If symbolic, the symbol must have been previously 
defined. A third operand is required if the programmer 
wishes to assign the address. For example, to store an 
array of 75 elements, each element containing 15 digits, 
the statements used would be: 



Lin* 


LoM 


Op«ra(ion 








Op«raf>d» & Rem 


mtkt 


3 5 


« II 


1} IS 


KM » 


N 


35 40 


45 


50 


0. 1.0 






i.S,7.5.,.lSJ4 



In this example, the array begins at location 01500 
(leftmost position of the first 15-digit element), array 
is equivalent to 01514 (address of the first element). 

DNB — Define Numerical Blank 

A DNB statement is used to define a field of numerical 
blanks. (The 8-4 card code denotes a numerical blank. ) 
Up to fifty blanks may be specified in each dnb state- 
ment. In addition to a label, two operands can be 
assigned by the programmer. The first of these specifies 
the number of blank characters desired (field length) 
and the second, the rightmost address of the field 
where the blanks are stored in the object program. 

If the second operand is omitted and the statement 
is labeled, the address assigned to the label by the 
processor is the rightmost storage position of the blank 
field. The blank field does not contain a flag in its 
leftmost position. 

If the programmer wishes to move a blank field in 
core storage, he must either define a single-digit con- 
stant with a flag bit in the position in front of the left- 
most position of the blank field or a record mark in the 
position following the rightmost position of the blank 
field. 

If six numerical blanks are required, they may be 
defined as follows: 



2- I. 


Lobel 
4 11 


t2 IS 


operandi & Rsfflorfci 

iiaOlS303S 40 4SSO 




B.LA.NMS 




e. : 



The processor assigns the storage address of the six 
blank positions to the label blanks. In the example 
that follows, the programmer assigns the storage 
address as 01625. 



Lir>e 


label 


Op«rofio«i 


Opcronds & Hcmarid 

l« X » 30 3S 40 45 JO 


0>1 .0 









In a DNB statement, two commas are required when- 
ever remarks are included in the statement; the first 
after the length operand and the second after, or in 
place of, the address operand. 

Summary of Declarative Statements 

As stated earlier, areas being defined by the processor 
are assigned core storage locations in the order in 
which they are processed. To do this, the processor 
program uses a location assignment counter to keep 
track of the address of the last assigned storage loca- 
tion. Table 1 shows the amount added to the location 
assignment counter for each instruction and sum- 
marizes the coding and operation of each declarative 
operation. ''Alpha Record Address" in the table refers 
to the leftmost position plus one of an alphameric 
field, whereas "Field Address" refers to the rightmost 
position of a field. The term "Numerical Record Ad- 
dress'' refers to the leftmost position of a field. 

Imperative Sfatemenfs 

This section describes the five classes of Imperative 
statements and gives examples of statements in sym- 
bolic form. For a detailed description of the function 
of each instruction, refer to the appropriate machine 
reference manual. 

Imperative statements are divided into five classes: 

1. Arithmetic 

2. Internal Data Transmission 

3. Logic 

4. Input/Output 

5. Miscellaneous 

Arithmetic Statements 

Table 2 lists the Arithmetic statements, some of which 
pertain to special features. Since some features are 
'special" for the 1620 Model 1 and "standard" for the 
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Table 1. Summary of Declarative Operations 



DECLARATIVE STATEMENT 
FORMAT 


AMOUNT ADDED TO LOCA- 
TION ASSIGNMENT COUNTER 

IF ADDRESS (A) IS BLANK 


VALUE STORED IN SYMBOL 
TABLE AS EQUIVALENT 

TO "SYMBOL" 


DATA FIELDS WHICH ARE 
LOADED AS A PART OF 

THE OBJECT PROGRAM 


LABEL 


OP 
CODE 


OPERANDS 


SYM 


DS 


UA 


L(length). 

If L is blank, 0 U added. 


A address. If A is blank, the 
field address from the location 
assignment counter is stored. 


None. 


SYM 


OSS 


L,A 


L (length). 

If L is blank, 0 is added. 


A address. If A is blank, the 
numerical record address from 
the location assignment counter 
is stored . 


None . 


SYM 


DAS 


L,A 


2x L is added. If L is blank, 
0 is added . 


A address must be odd. If A is 
blank, the alpha record address 
from the location assignment 
counter is stored. 


None. 


SYM 


DC 


L,C,A 


L is added. 


A address. If A is blank, the 
field address from the location 
assignment counter is stored. 


C, the (numerical) constant . 


SYM 


DSC 


L,C,A 




A oddr^^^ If A i« binnk th» 

numerical record address from 
the location assignment counter 
is stored . 




SYM 


DAC 


L,C,A 


2x L is added. 


A address must be odd. If A is 
blank, the alpha record address 
from the location assignment 
counter is stored. 


C, the (alphameric) constant. 


SYM 


DSA 


D,E,F,G, 
H, 1, J, K, 
L,M 


5 X (number of addresses) is 
added. 


Field address of the first address 
on list. 


A list of the actual addresses 
that correspond to D,E,F, etc. 


SYM 


DSB 


L,N,A 


Length of each element times 
the number of elements is added . 


A address. If A is blank, field 
address of the first element Is 
stored . 


None. 


SYM 


DNB 


L,A 


L is added. 


A address. If A is blank, the 
field address from the location 
assignment counter is stored. 


Number of blank characters 
that equal L. 



1620 Model 2, no indication is made in the table to 
diflEerentiate between the two types. 

Examples 

These statements cause the following operations to be 
performed: 

Line 010 — Add labor amount to cost amount. 

020 — Same as line 010 except three commas 
are required for remarks. 

030 — Subtract a constant 02 from the field lo- 
cated at STORE plus 4. 

040 — Add a constant 05 to the field at storage 
location 00088. 



050 — Move DDND ( dividend ) to the product 
area (storage location 00097). 



Line 
1 i 


Label 

6 n 


Operation 

ij 15 


operands & Remarks 

JO 2i » JS 40 'i iO 


fl.',,o 




A, , , 


C.OS.ruLABOR. 










0.3,0 




4, , , 


CASXtXABOR.j.fAPD. LAB.O.R TO .CAST . , . 










O.i ,0 




sA , 


sm^e.+4, 2 ,jo 










0,* .0 




aA , 


8.8.s.OSf.i.0,H.ALF'AO.J(JSr, P.O.SJjjyf .AMT . 










O.S .0 






9.ijPAf^A , , ........ ......... 














A , , 


8.6,^MR 
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Table 2. Aritlunetic Instructions 



NOTE: Indirercf Addressing and indexing are allowable with all P address operarKls listed below. An * to the left of the Q operand Indicates 
these features may be used with it . 



OPFPATIOKI 


OPERATION CODES 


OPERANDS 


MNEMONIC 


AaUAL 


P ADDRESS 


Q ADDRESS 


Add 


A 


21 


Storage address of units position of augend 


^Storage address of units position of addend 


Add Immediate 


AM 


11 


Some as code 21 


^ of instruction is units position of addend 


Subtract 


S 


22 


Storage address of units position of minuend 


* Storage address of units position of subtra- 
hend 


Subtract 
Immediate 


SM 


12 


Same as code 22 


^ of instruction is units position of 
subtrahend 


Multiply 


M 


23 


Storage address of units position of 
multiplicand 


^Storage address of units position of 
multiplier 


Multiply 
Immediate 


MM 


13 


Same as code 23 


Q.^ of instruction is units position of 
multiplier 


Load Dividend 


LD 


28 


Storage address in product area to which 
units position of field (dividend) is to be 
transmitted 


^Storage address of units position of dividend 


Load Dividend 


LDM 


18 


Same as code 28 


Q|j of instruction is units position of 
dividend 


Divide 


D 


29 


Storage address at which first subtraction 
of the divisor occurs 


^Storage address of units position of divisor 


Divide 
Immediate 


DM 


19 


Same as code 29 


Qp of instruction is units position of divisor 


Floating Add 
(Speciol Feature) 


FADD 


01 


Storage address of units position of exponent 
of augend 


^Storage address of units position of exponent 
of addend 


Floating Subtract 
(Special Feature) 


FSUB 


02 


Storage address of units position of exponent 
of minuend 


^Storage address of units position of exponent 
of subtrahend 


Floating MultipIv 
(Special Feature) 


FMUL 


03 


Storage address of units position of exponent 
of multiplicand 


*Storage address of units position of exponent 
of multiplier 


Floating Divide 
(Special Feature) 


FDIV 


09 


Storage address of units position of exponent 
of dividend 


^Storage address of units position of exponent 
of divisor 



060 — Divide the dividend by successive sub- 
tractions of the DVR (divisor), starting in 
storage location 00086. 

Internal Data Transmission Statements 

Table 3 lists the mnemonics for Internal Data Trans- 
mission statements. Some statements pertain to in- 
structions that require special features; however, some 
special instructions for the 1620 Model 1 are standard 
on the 1620 Model 2. No indication is made in the 
table to diflFerentiate between the two types. 



line 
1. 5. 


Lobel 


Opefotion 
12 IS 


operands & Remorks 

l« M }S 30 IS 40 45 SO 


fl.' .9 




TA , 


f./.£iP.,PJ.GiT. 










8i»<P 




rpn 


FJUA^S^ : , , , . 










0 , 3 ,0 






srfiM.tXAT.EJ tt.MAVe. RATM. J. JA STARS. . . 










0,* tO 






SXM£.k3S2S} KfiOMX. A3S^2,s, TP. .SXPM 










Of5 ,0 






»~JJ,tAJ.jJfl.iCMGI. AR£y. .OP, .CAO£, T,0, ,NPP. 










0 ^< lO 






A.-,.B^ijAOJ^y£.RT. F.LO. .A, Tfl. .N.Uf1,E,R, ^CpfiJ ,NG. . 










0,7.0 






C.iAi.uCPH.V.£.Rr. .Ftp. P. T.O. .A.l.F.H.A. .CP.D/MG . 



These statements cause the following instructions to 
be executed: 

Line 010 — A numerical digit at the location called 
DIGIT is moved to the location called 

FIELD. 



020 — A digit 3 is moved to the location called 

FIELD. 

030 — RATE 1 is moved to the field called store. 
040 — A constant 3525 is moved to the location 
called store. 
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050 — A constant 41 is moved to Oo and Oi 
positions of the preceding instruction in 
the object program. 

060 — Field A is moved to field B and converted 
from alphameric coding (2 digits per 
character) to numerical coding (1 digit 
per character). 



070 — Field D is moved to field C and con- 
verted from numerical coding to alpha- 
meric coding. 

Logic Statements 

Table 4 lists the mnemonics for Logic statements. Note 
that the Branch Indicator ( bi ) and Branch No Indica- 



Table 3. Internal Data Transmission Instructions 



NOTE: Indirect Addressing and indexing are allowable with all P address operands listed below. An * to the left of the Q address operand 
indicates these features may be used with it. 



OPERATION 


OPERATION CODES 


OPERANDS 


MNEMONIC 


ACTUAL 


P ADDRESS 


Q ADDRESS 


Transmit Digit 


TD 


25 


Storage address to which single digit is 
transmitted 


* Storage address of single digit to be trans- 
mitted 


Transmit Digit 
immediate 


TDM 


15 


Same as code 25 


^ of instruction is the single digit to be 
transmitted 


Transmit Field 


TF 


26 


Storage address to which units position of 
field is transmitted 


*Storage address of units position of field to 
be transmitted 


Transmit Field 
Immediate 


TFM 


16 


Same as code 26 


Q, ^ of instruction is the units position of the 
field to be transmitted 


Transmit Record 


TR 


31 


Storage address to which high-order position 
of the record is transmitted 


*Storage address of high-order position of the 
record to be transmitted 


Transmit Record 
No Record Mark 


TRNM 


30 


Same as code 31 


*Same as code 31 


Transfer 

Numerical Strip 


TNS 


72 


Storage address of rightmost position of 
alphameric field to be transmitted 


*Storage address of the units position of the 
numerical field 


Transfer 
Numerical Fill 


TNF 


73 


Storage address of rightmost position of 
alphameric field 


•Storage address of the units position of the 
numerical field to be transmitted 


Floating Shift 
Right (Special 
Feature) 


FSR 


08 


Storage address to which units (rightmost) 
digit of mantissa is transmitted 


•Storage address (rightmost) digit of mantissa 
to be transmitted 


Floating Shift 
Left (Special 
Feature) 


FSL 


05 


Storage address to which high-order digit 
of the mantissa is transmitted 


•Storage address of low-order digit of mantissa 
to be transmitted 


Transmit 
Floating 


TFL 


06 


Storage address to which units position of 
exponent is transmitted 


•Storage address of units position of exponent 
of field to be transmitted 


Move Address 
(Special Feature) 


MA 


70 


Storage address of units position of 5-digit 
field to which data is transmitted 


•Storage address of units position of 5-digit 
field to be transmitted 


OR to Field 
(Special Feature) 


ORF 


92 


Storage address of leftmost position of first 
field for OR logic input 


•Storage address of leftmost position of second 
field for OR logic input 


AND to Field 
(Special Feature) 


ANDF 


93 


Storage oddress of leftmost position of first 
field for AND logic 


•Storage address of leftmost position of second 
field for AND logic 


Exclusive OR to 
Field (Special 
Feature) 


EORF 


95 


Storage address of leftmost position of first 
field for Exclusive OR logic 


•Storage address of leftmost position of second 
field for Exclusive OR logic 


Complement 
Octal Field 
(Special Feature) 


CPLF 


94 


Storage oddress of leftmost position of field 
to which data is transmitted 


•Storage address of leftmost position of field to 
be complemented 


Octal to 

Decimal Conver- 
sion (Special 
Feature) 


OTD 


96 


Storage address of the units position of 
the power-of -eight table 


•Storage address of leftmost position of field to 
be converted 


Decimal to Octal 
Cpnversion (Spec- 
ial Feature) 


DTO 


97 


Storage address of the units position of the 
highest power-of-eight required 


•Storage address of leftmost position of field to 
be converted 
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Table 4. Logic (Branch and Compare) Instructions 



NOTE: Both the Bl (Branch Indicator) and BNt (Branch No Indicator) instructions require one of the switch or indicator codes listed in Table 21 as 
a Q address. The code indicates the switch or indicator to be interrogated for status. To relieve the programmer of having to code a Q address, 
unique mnemonics are included in SP5 language for both Bi- and BNI-type instructions. For a unique mnemonic, the processor generates the actual 
machine language code 46 (Branch Indicator) or 47 (Branch No Indicator) and the Q address that represents the switch or indicator. 

Indirect Addressing and indexing are allowable with all P address operands listed below except Branch Back. An * to the left of the Q address 
operand indicates these features may be used with it. 



OPERATION 


OPERATION CODE 


OPERANDS 


MNEMONIC 


ACTUAL 


P ADDRESS 


Q ADDRESS 


Compare 


C 


24 


Storage address of units position of the field 
to which another field is compared 


^Storage address of units position of the field 
to be compared with the field at the P address 


Compare 
Immediate 


CM 


14 


Same as code 24 


Op of instruction is units position of the 
field to be compared with the field at the P 
address 


Branch 


B 


49 


Storage address of the leftmost digit of the 
next instruction to be executed 


Not used 


Branch No Flag 


BNF 


44 


Storage address of the leftmost digit of next 
instruction to be executed if branch occurs 


*Storage address to be interrogated for 
presence of a flag bit 


Branch No 
Record Mark 


BNR 


45 


Same as code 44 


*Storage address to be interrogated for 
presence of a record mark character 


Branch No 
Group Mark 


BNG 


55 


Same as code 44 


*Storage address to be interrogated for 
presence of a group mark character 


Branch On 
Digit 


BD 


43 


Same as code 44 


^Storage address to be interrogated for a 
digit other than zero 


Branch 
Indicator 


Bt 


46 


Storage address of leftmost position of next 
instruction to be executed if indicator tested 
is on 


Qq and Qg of instruction specify the program 
switch or indicator to be interrogated (see 
Table 5) 


Unique Branch 

Indicator 

Mnemonics: 










Branch High 


BH 


46 


Same as Bl 


None required 


Branch Positive 


BP 


46 


Same as Bl 


None required 


Branch Equal 


BE 


46 


Same as Bl 


None required 


Branch Zero 


BZ 


46 


Same as Bl 


None required 


Bronch Overflow 


BV 


46 


Same as Bl 


None required 


Branch Any Data 

rherU 
v.ncc K 


BA 


46 


Same as Bl 


None required 


Branch Not Low 


BNL 


46 


Same as Bl 


None required 


Branch Not 
Negative 


BNN 


46 


Same as Bl 


None required 


Branch Bond A 
Selected 


BBAS 


46 


Same as Bt 


None required 


Branch Band B 
Selected 


BBBS 


46 


Same as Bl 


None required 


Branch Neither 
Band Selected 


BNBS 


46 


Same as Bl 


None required 


Branch Console 
Switch 1 On 


BCl 


46 


Same as Bl 


None required 


Branch Console 
Switch 2 On 


BC2 


46 


Same as Bl 


None required 
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Table 4. Logic ( Branch and Compare ) Instructions ( cont'd ) 



OPERATION 


OPERATION CODE 


OPERANDS 


MNEMONIC 


ACTUAL 


P ADDRESS 


Q ADDRESS 


Branch Console 
Switch 3 On 


BC3 


46 


Same as Bl 


None required 


Branch Console 
Switch 4 On 


BC4 


46 


Some as Bl 


None required 


Branch Lost Card 


^LC 


46 


Some as Bl 


None required 


Branch Exponent 
Check (Special 
Feature) 


BXV 


46 


Same as Bl 


None required 


Branch on 
Channel 9 


ov.riy 




Same as Bf 


None required 


Branch on Channel 
Overflow 




46 


oame as dI 


None required 


Bronch No 
Indicator 


DIN 1 


A7 
4/ 


Storage address of leftmost position of 
next instruction to be executed if indicator 
tested is off 


Qg and of instruction specify program 
switch or indicator to be interrogated (see 
lODie 0; 


Unique Branch 
No Indicator 
Mnemonics: 










Branch Bond A 
Not Selected 


BANS 


47 


Some OS BN 1 


None required 


Branch Band B 
Not Selected 


B6NS 


47 


Some as BNt 


None required 


Branch Either 
Band Selected 


BEBS 


47 


Same as BNI 


None required 


Branch Not High 




4/ 


borne as biNI 


None required 


Branch Not 
Positive 


DIN r 


A 7 

4/ 


oame as dinI 


None required 


Branch Not Equal 


BNE 


47 


Same as BNI 


None required 


Branch Not Zero 


BNZ 


47 


Some as BNI 


None required 


Branch No 
Overflow 


BNV . 


47 


Same as BNI 


None required 


Branch Not Any 
Data Check 


BNA 


47 


Same as BNI 


None required 


Branch Low 


BL 


47 


Same as BNI 


None required 


Branch Negative 


BN 


47 


Same as BNI 


None required 


Branch Console 
Switch 1 Off 


BNCl 


47 


Some as BNI 


None required 


Branch Console 
Switch 2 Off 


BNC2 


47 


Some as BNI 


None required 


Branch Console 
Switch 3 Off 


BNC3 


47 


Same as BNI 


None required 


Branch Console 
Switch 4 Off 


BNC4 


47 


Same as BNI 


None required 


Branch Not Last 
Card 


BNLC 


47 


Same as BNI 


None required 
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Table 4. Logic (Branch and Compare) Instructions (cont'd) 



OPERATION 


OPERATION CODE 


OPERANDS 


MNEMONIC 


ACTUAL 


P ADDRESS 


Q ADDRESS 


Branch Not 
Exponent Check 
(Special Feature) 


BNXV 


47 


Same as BN 1 


None required 


Branch and 
Transmit 


BT 


27 


P address minus one is the storage address to 
which the units position of the Q field is 
transmitted. P address is leftmost digit of 
the next instruction to be executed 


^Storage address of units position of the 
field to be transmitted 


Branch and 

Transmit 

Immediate 


BTM 


17 


Same as code 27 


J of instruction is units position of field to 
be transmitted 


Branch and 

Transmit 

Address 


BTA 


20 


Same as code 27 


*Stora9e address of units position of the 
field to be transmitted 


Branch and 
Transmit Address 
Immediate 


BTAM 


10 


Same as code 17 


1 of instruction is units position of field to 
be transmitted 


Branch Bock 


BB 


42 


Not used 


Not used 


Branch and 
Transmit Floating 


BTFL 


07 


P address minus one is the storage address to 
whicih the units position of the exponent 
portion of the Q field is transmitted. P is 
the storage address of the leftmost digit of the 
next instruction to be executed 


*Storage address of units position of exponent 
of field to be transmitted 


Branch and 
Select 


BS 


60 


Storage address of the leftmost position of 
the next instruction 


^ specifies condition to be selected 


Unique Branch 
and Select 
Mnemonics: 










Branch and 
Select Indirect 
Addressing 


BSIA 


60 


Same as BS 


None required 


Branch and 
Select No l/A 


BSNI 


60 


Same as BS 


None required 


Branch and 
Select Band A 
(Special Feature) 


BSBA 


60 


Same as BS 


None required 


Branch and 
Select Band B 
(Special Feature 


BSBB 


60 


Same as BS 


None required 


Branch and 
Select No Index 
Register (Special 
Feature) 


BSNX 


60 


Same as BS 


None required 


Branch and Modify 
index Register 
(Special Feature) 


BX 


61 


Same as BS 


**Storage address of units position of field 
to be added to selected index register 


Branch and Modify 
Index Register 
Immediate (Special 
Feature) 


BXM 


62 


Same as BS 


**Five digits of Q field are added to 
selected index register 


Branch Condition- 
ally/ Modify Index 
Register (Special 
Feature) 


BCX 


63 


Same as BS if (after modification) IX sign has 
not changed or result is not zero 


Same as BX 
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Table 4. Logic (Branch and Compare) Instructions (cont'd) 



OPERATION 


OPERATION CODE 


OPERANDS 


MNEMONIC 


ACTUAL 


P ADDRESS 


Q ADDRESS 


Branch Condition- 
ally, Modify Index 
Register Immediate 
(Special Feature) 


BCXM 


64 


Same as BCX 


Same as BXM 


Branch and Load 
Index Register 
(Special Feature) 


BLX 


65 


Same as BS 


**Storage address of units position of 5-digit 
field to be loaded to selected index register 


Branch and Load 
Index Register 
Immediate (Special 
Feature) 


BLXM 


66 


Same as BS 


**Five digits of Q field are loaded to 
selected index register 


Branch and Store 
Index Register 
(Special Feature) 


BSX 


67 


Some as BS 


Storage address of units position of field 
where selected index register data is to be 
stored 


Branch on Bit 
(Special Feature) 


BBT 


90 


Storage address of the leftmost position of 
next instruction if comparison is successful 


*Qg_^ ^ specifies storage address of units 
posmon of field to be compared with bits 
of the digit 


Branch on Mask 
(Special Feature) 


BMK 


91 


Same as code 90 


*Qrt_| ^ specifies storage address of units 
position of field to be compared with 
digit * 



Specific index register is selected by flags over the Q ^^Qpositions of the instruction. 



tor (bni) instructions require one of the switch or in- 
dicator codes listed in Table 5 to be a Q address. The 
code indicates the switch or indicator to be interro- 
gated for status. To relieve the programmer of having 
to code the Q address, unique mnemonics are provided 
for most of the possible combinations of operation 
codes and indicators. 





Label 


1} IS 


Operondi & Remorkt 

U 30 ZS 30 U 40 4S so 


e. 1 .0 




, , 


ByAry^CPHPA^RE. FI.E.LP. A. WJm J.I.e.LD B. . 










,« 






SJ.A,RXj.y,BR.MCH XO MABEL .S.rARJ. 










Oi) .0 


,1 11 J 1 




SfARXf J.OOi.jJf. .SM/. OH.i. fi,R. TO, .START. , . 










Oj4 <0 






START f tSAMI. AS. .U.H.t .0.3.0. 
















STA.R.rxS.*.12,yy.,. , . , 



















These statements cause the following operations to be 
performed in the object program, as follows: 
Line 010 — Compare field A with field B. 

020 — Branch to an instruction labeled start. 
030 — If Program switch 1 is on, branch to the 

instruction labeled start. 
040 — Same as line 030 with the exception that 
the unique mnemonic operation code 
used does not require a Q address. 
050 — If Program switch 1 is not on, branch to 
the third instruction following the one 



labeled start. 
060 — Branch unconditionally to an instruction 
whose address is saved in IR-2 or PR-1. 



Table 5. Switch and Indicator Codes used as Actual Q 
Addresses in BI and BNI Instructions 



Q ADDRESS 


SWITCH OR INDICATOR 




^8 


Q9 








X 


0 


1 


Y 


Y 


Program Switch 1 


X 


0 


2 


Y 


Y 


Program Switch 2 


X 


0 


3 


Y 


Y 


Program Switch 3 


X 


0 


4 


Y 


Y 


Program Switch 4 


X 


0 


6 


Y 


Y 


Read Check Indicator* 


X 


0 


7 


Y 


Y 


Write Check indicator* 


X 


0 


9 


Y 


Y 


Lxist Card Indicator (special feature) 


X 




1 


Y 


Y 


High/Positive indicator 


X 




2 


Y 


Y 


Eq JO I/Zero Indicator 


X 




3 


Y 


Y 


High/Positive or Equal/Zero Indicator 


X 




4 


Y 


Y 


Overflow Check Indicator 


X 




5 


Y 


Y 


Exponent Check Indicator 


X 




6 


Y 


Y 


MBR-Even Check Indicator* 


X 




7 


Y 


Y 


MBR-Odd Check Indicator* 


X 




9 


Y 


Y 


Any Data Check 


X 


2 


5 


Y 


Y 


Printer Check* 


X 


3 


3 


Y 


Y 


Channel 9 


X 


3 


4 


Y 


Y 


Channel 12 


X 


3 


5 


Y 


Y 


Printer Busy 



X indicates any digit value or blank is permissible 
Y indicates any digit value is permissible 
* indicates the Any Data Check indicator (19) also is on when 
this indicator is on. 
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Input and Output Statements 

Table 6 lists the mnemonics for Input/Output state- 
ments. If a two-character mnemonic (for example, ra) 
is used, the unit code must be included as part of the 
Q operand. The unit codes are shown in Table 7. 



Examples 



Line 
2 i 


Lob«l 


Opcrofion 


Operandi & Remorkt 

U » » » 3S 40 4S so 






M . 


o.(/.r.p.u.r.rJ.oo^ . , , . . , 
















OMTAl/Xy fySM/ AS. l.l fiX. JO.lp, 










0 J..0 




< . , 


fJPXuj,SAMI. /tS /./,^/. OM 








,. I L 1 .J I— L <— l._t. i_i .i-. l_l i-..J ..1 1. i_i .L-i i. .J- LI J_l. .-L 1 











These statements cause the following operations to be 
performed in the object program. 

Line 010 — Type out alphameric data from a storage 
location called output. 
020 — Same as line 010, however, a unique 

mnemonic is used. 
030 — Single space on the typewriter. 
040 — Same as line OSOj however, a unique 
mnemonic is used. 

Miscellaneous Statements 

The statements that are listed in Table 8 are those that 
do not fit in any group already described. 

Examples 



Line 
3 S 


Label 
« 11 


Opefotion 
12 1$ 


operandi 9> ftemorki 

I4 20H301S40 4JSO 


9.1.0 




CF 


OUTPUT'S- ..... 










9i?iO 




, 


J,3,5,2,,.y.e.d.^,.,, . . . . , , 
















>.>.i.HMT. i 








-1. l.i l.-Ll_t,l__l_t..J_i ,J^ I-i -L-l-t-.! Illllll.il. 


«,4,0 






1 1 1 1 l i 1 .1 1 1 t i -L. t 1 i 1 1 1 1 1 1 1 1 1 1 1 — 1 1 1 1 1 — ^ 1 .1 1. 



These statements cause four different operations to be 
performed in the object program, as follows: 
Line 010 — Clear a flag at the storage location, out- 
put minus 5. 
020 — Move a flag from storage location 01694 

to storage location 03352. 
030 — Cause the program to halt. 
040 — Perform no operation but proceed to the 
next sequential instruction. 



Processor Control Statements 

Control statements are orders to the processor ( sps iu 
assembly program ) that give the programmer control 
over portions of the assembly process. The sps language 
includes the following control statements. 

DORG Define Origin 

DEND Define End 

SEND Special End 

HEAD Heading 

TCD Transfer Control and Load 

TRA Transfer to Return Address 

With the exception of the tra and dorg, none of the 
above statements may be labeled. 

DORG — Define ORiGin 

The DORG statement instructs the processor to override 
its automatic assignment of storage and to begin the 
assignment of succeeding entries at the particular loca- 
tion specified by the programmer. In this way the pro- 
grammer is able to control assignment of storage to 
instructions, constants, and data. If a Define Origin 
statement is not the first entry in a source program, 
the processor begins the assignment of storage at loca- 
tion 00402. 

A Define Origin statement is coded as follows: 



Line 
i L 


Label 


Operofion 

n, ..,,'4 


Operandi & Remorkt 

14 M » 30 35 40 4} K 








7,$M , 



This statement directs the processor to reset its loca- 
tion assignment counter to the particular address speci- 
fied in the operand (actual or symbolic), and this 
causes the assignment of succeeding entries to begin 
at this address. When an actual address is entered by 
the programmer, care must be taken to avoid inadver- 
tent overlapping with areas assigned by the processor. 

If the operand is left blank, assignment of storage 
starts with address 00000. Since the arithmetic tables 
are stored in locations 00100 through 00401, constants 
and instructions cannot occupy these storage locations. 

If a symbolic address is entered, it must appear as a 
label earlier in the program sequence. An * address 
refers to the current contents of the location assign- 
ment counter. A Define Origin statement can take any 
of the following individual forms: 



Line 
i_ * 


Lobet 


operation 

12 tj 


Operands & Remarki 

H M IS 30 35 « 45 , . SO. 


S. t..« 






XYZ. 










Si'if 






XYA^fifi, , 










0.1.9 




op/tfi 
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Table 6. Input and Output Instructions 



NOTE: Indirect Addressing and indexing ore allowable Wth all P address operands, where a P operand is required. None of the Q operands 
shown may be used with Indirect Addressing or Index Registers. 



OPERATION 


OPERATION CODE 


OPERANDS 




Am lAi 

M^l UAL 


r AL/UKCDd 




Read 

Numerically 


RN 


36 


Storage address at which leftmost (first) num- 
erical character is stored 


Qg and of instruction specify input unit 


Unique Read 
Numerically 
Mnemonics: 










iveaa 

Numerically 
Typewriter 


RNTY 


36 


Same as RN 


None required 


i\eaa 

Numerically 
Paper Tape 


RNPT 


36 


Same as RN 


None required 


Read 

Numerically 
Card 


RNCD 


36 


Same as RN 


None required 


Write 

Numerically 


WN 


38 


Storage address from which leftmost (first) 
numerical character is written 


Qg and of instruction specify output unit 


Unique Write 

Numerically 

Mnemonics: 










vvriTe 

Numerically 
Typewriter 


WNTY 


38 


Same as WN 


None required 


Write 

Numerically 
Paper Tape 


WNPT 


38 


Same as WN 


None required 


Write 

Numerically 
Card 


WNCD 


38 


Some as WN 


None required 


Print 

Numerically 


PRN 


38 


Same as WN 


None required 


Print' t\Ii im^r! r^nl Iv 

I 1 nil I^UIIICl IwUlljr 

and Suppress 
Spacing 


PRNS 


38 


Same as WN 


None required 


Numerically 


DN 


35 


Same as WN 


Some OS WN 


Unique Dump 

Numerically 

Mnemonics: 










Dump 

Numerically 
Typewriter 


DNTY 


35 


Same as WN 


None required 


Dump 

Numerically 
Paper Tape 


DNPT 


35 


Same as WN 


None required 


Dump 

Numerically 
Card 


DNCD 


35 


Same as WN 


None required 


Printer Dump 


PRD 


35 


Same as WN 


None required 


Printer Dump 
and Suppress 
Spacing 


PRDS 


35 


Same as WN 


None required 


Read 

Alphamerically 


RA 


37 


Storage address at which numerical digit 

of leftmost (first) character is stored. (Zone 
digit of first character is at P minus one.) 


Qg and of instruction specify input unit 
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Table 6. Input and Output Instructions ( cont'd ) 



OPERATION 


OPERATION CODE 


OPERANDS 


MNEMONIC 


ACTUAL 


P ADDRESS 


Q ADDRESS 


Unique Read 

Alphamerically 

Mnemonics; 










Read Alpha- 
merically 
Typewriter 


RATY 


37 


Some as RA 


None required 


Read Alpha- 
merically 
Paper Tape 


RAPT 


37 


Same as RA 


None required 


Read Alpha- 
merically Card 


RACD 


37 


Same as RA 


None required 


Read Binary 
Paper Tape 
(Special Feature) 


RBPT 


37 


Same as RA 


None required 


Write Alpha- 
merically 


WA 


39 


Storage address of numerical digit of left- 
most (first) character to be written . (Zone 
digit of first character is at P minus one.) 


Qg and of instruction specify output unit 


Unique Write 

Alphamerically 

Mnemonics: 










Write Alpha- 
merically 
Typewriter 


WATY 


39 


Same as WA 


None required 


Write Alpha- 
merically 
Paper Tape 


WAPT 


39 


Same as WA 


None required 


Write Alpha- 
merically Card 


WACD 


39 


Same as WA 


None required 


Write Binary 
Paper Tape 
(Special Feature) 


WBPT 


39 


Same as WA 


None required 


rrinf Aipna- 
merically 


PRA 


39 


Same as WA 


None required 


Prinf Alnkn — 

rnnr Mipna 
merically and 
Suppress Spacing 


PRAS 


39 


Same as WA 


None required 


Control 


K 


34 


Not used 


Q- and specify input/output unit. Q, , 
specifies control functions 


Unique Control 
Mnemonics 










Backspace 
Typewriter 


BKTY 


34 


Not used 


None required 


Tabulate 
Typewriter 


TBTY 


34 


Not used 


None required 


Index Type- 
writer 


IXTY 


34 


Not used 


None required 


Return Carriage 
Typewriter 


RCTY 


34 


Not used 


None required 


Space Type- 
writer 


SPTY 


34 


Not used 


None required 


Skip Immediate 


SKIP 


34 


Not used 


See Table 14 


Skip After 
Printing 


SKAP 


34 


Not used 


See Table 14 
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Table 6. Input and Output Instructions (cont'd) 



OPERATION 


OPERATION CODE 


OPERANDS 




MNEMONIC 


ACTUAL 


P ADDRESS 


Q ADDRESS 


Spoce 
Immediate 


SPIM 


34 


Not used 


See Table 15 


Space After 
Printing 


SPAR 


34 


Not used 


See Table 15 


Seek 




34 


Storage address of disk control field 


X07X1 


Read Disk/^LRC 




36 


Same as Seek 


X07X0 


Write Disi0/VLRC 




38 


Same as Seek 


X07X0 


Check Disi^VLRC 




36 


Same as Seek 


X07X1 


Read Disk 
TracK/WLRC 




36 


Some as Seek 


X07X4 


Write Disk 
TracK/WLRC 




38 


Same as Seek 


X07X4 


Check Disk 
TracKAVLRC 




36 


Same as Seek 


X07X5 


ixCau L/ISK 




36 


Same as Seek 


X07X2 


Write Disk 




38 


Same as Seek 


X07X2 


Check Disk 




36 


Same as Seek 


X07X3 


Read Disk Track 




36 


Same as Seek 


X07X6 


Write Disk Track 




38 


Same as Seek 


X07X6 


Check Disk 
Track 




36 


Same as Seek 


X07X7 



If XYZ (label) is previously defined as 01002, the first to the symbol xyz plus 50. The symbol origin can be 
entry directs the processor to begin the assignment of used at any point in the program to refer to that 
succeeding entries at location 01002. The second entry address. The third entry directs the processor to begin 
directs the processor to begin the assignment of sue- the assignment of succeeding entries at the address 
ceeding entries at the location that has been assigned specified by the current contents of the location assign- 
ment counter plus 50. A comma must follow the oper- 
and when remarks are included in a dorg statement. 

DEND — Define END 

The DEND statement is the last statement entered in the 
source program, it instructs the processor that all state- 
ments of the source program have been processed. A 
DEND statement may also be used to cause execution 
of the object program to begin immediately after it has 
been loaded. To do this, the dend statement requires 
the presence of an operand representing the starting 
address of the program. The operand may be actual 
or symbolic. The 1620 will halt at the completion of 
loading of the object program, and execution then will 
begin at the address corresponding to the starting 
address, upon depression of the Start key. If the 
operand specifying the starting address is omitted, the 
program will halt and the operator will have to start 
the program manually. 



Table 7. Input and Output Unit Codes Used as Actual 
Q Addresses in RN, WN; DN, RA, and WA 
Instructions 



Q ADDRESS 


DEVICE 


Qy 




Q9 




Qn 




X 


0 


1 


Y 


Y 


Typewriter 


X 


0 


2 


Y 


Y 


Paper Tope Punch 


X 


0 


3 


Y 


Y 


Paper Tape Reader 


X 


0 


4 


Y 


Y 


Card Punch 


X 


0 


5 


Y 


Y 


Card Reader 


X 


0 


9 


Y 


Y 


Printer 



X indicates any digit value or blank is permissible 
Y indicates any digit value is permissible 
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Table 8. Miscellaneous Instructions 



OPERATION 


OPERATION CODE 


OPERANDS 






MNEMONIC 


ACTUAL 


P ADDRESS 


Q ADDRESS 


Set Flag 


SF 


32 


Storage address at which flag X bit Is placed 


Not used 


Clear Flag 


CF 


33 


Storage address from which X flag bit is cleared 


Not used 


Move Flag 


MF 


71 


Storage address to which flag X bit is moved 


Storage address of flag bit to be moved X 


Halt 


H 


48 


Not used 


Not used 


No Operation 


NOP 


41 


Not used 


Not used 



The following statements illustrate both types of 
entries. 



Line 
3 5 


Label 




Op«rand> & Remarkj 

14 » 25 30 35 40 45 50 


fl,.' |0 








0,,,2-L.a. 














STAKT, . 



The program is halted after loading by either state- 
ment. In the second case, execution begins at the 
address corresponding to start, upon depression of the 
Start key. 

When a dend statement includes comments but no 
operand, the operand must be replaced by a comma. 

SEND — Special END 

A SEND statement is provided to halt the tape pro- 
cessor on both passes of the source program. If a send 
statement is encountered by the card processor, the 
card processor will not be halted. This statement does 
not produce any output in the object program. 
The send statement is used: 

1. To halt the processor after one tape of a source 
program is processed and to allow the remainder 
of the source program from another tape to be 
threaded and then processed. 

2. To halt the processor so that program switch 
settings may be changed and processing resumed. 

The send statement takes the following form and 
requires no operands. 



message "LOAD NEXT TAPE" is typed. The operator 
threads the next tape or changes switch settings or 
both, and then depresses the Start key. 

If the first part of the source program is entered 
from the typewriter, Program Switch 1 will be oflF and 
the statements will be entered one at a time. When the 
SEND statement is entered, the processor halts. The 
operator may then turn on Program Switch 1, thread 
the source program tape, and continue processing the 
source program, send is especially useful where a long 
source program is punched in tape and certain ad- 
dresses associated with labels being defined by that 
tape must be changed. For example, the following 
statements, part of source program A, may require that 
addresses 01000 and 02000 be changed to 01250 and 
02500, respectively. 



line 


LqImI 


Opwation 


Oparandt & Remark* 

U30MMlS40 4Sj4 


ft. 1,0 


COMTRL 




,0iAop 






AS, , 


^PippA . , . 



To change these addresses, the operator will enter the 
following statements at the typewriter 



Line 

2 J 


Label 


Operarion 

1J 15 


Opefondi & Remorib 

1«» X X 35 40 « SO 


O.I .0 






,0125.0 , . , 


0.9.0 


N.DJ.GJT 




9 02,5 0.0, . . ^ 


0,}.0 









3 5 


Label 


Operation 


14 V) 1 


30 35 


Operands & Remarkt 
40 45 so 


P J„.o 









When this statement in the source program is en- 
countered by the processor, the program halts and the 



and follow them by source program A. The first time 
labels CONTRL and ndigit are encountered by the pro- 
cessor, they are assigned addresses; the second time 
they are encountered, no addresses are assigned but 
an error message is typed. In this case, the operator 
can ignore the error message. 
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In some cases, the programmer may choose to end 
a source program with a send statement rather than a 
DEND statement. This situation allows the programmer 
to enter additional statements, either additional decla- 
rative statements or corrections to imperative state- 
ments. However the last additional statement entered 
must be a dend statement. 

HEAD — HEADing 

It is frequently convenient, and sometimes necessary, 
to write a source program piecemeal, and to assemble 
these pieces into the total program. Parts of the pro- 
gram may be written by diflferent programmers, or by 
the same programmer at difiEerent times with consider- 
able time lapses between. 

Suppose, in such a situation, that a program block, 
say Bi has been written; that another program block, 
B2, is in the course of being written; and that Bi and 
B2 eventually are to be joined to compose a single pro- 
gram. Certain symbols may already have been used 
in writing block Bi, and certain symbols, varying from 
the symbols used in Bi, may be used in writing block 
B2. To avoid duplication of symbols in each block, the 
programmer writing block B2 must be concerned with 
the symbols used in Bi. 

Symbols used in block B2 can duplicate those in Bi, 
provided they are less than six characters in length 
and have been prefaced by a head statement. The pro- 
grammer can completely ignore the symbols in Bi by 
prefacing B2 with the following control statements: 



Une 


Lob«l 


11 IS 


Op«rond» & Remorki 

U » 25 30 U « 4S so 








X ^ 



where the single character X may be any one of the 
characters A to Z, 0 to 9, or blank. 

The control instruction, head x generates no instruc- 
tions or data in the object program. When the processor 
encounters a head statement, it treats the symbols 
in the label or operands fields of the following state- 
ments, provided the symbols are less than six charac- 
ters in length, as though they were headed by the 
character X. The processor continues to do this until 
it encounters another head statement. 

Thus the symbols used in block Bi which contain 
less than six characters cannot possibly conflict with 
the symbols used in block B2. Six-character symbols are 
not affected, that is, a six-character label, common, fol- 
lowing the control instruction head 9 is not treated as 
9coMMON, for it would be a seven-character symbol, 
and only a maximum of six characters can be handled 
by the symbol table. 



A symbol is said to be "unheaded" if, and only if, 
its representation uses exactly six characters. The sym- 
bol COMMON, for example, is unheaded. The symbol 
alpha whose length is less than six characters is con- 
sidered to be headed, whether under a head control 
instruction or not. If alpha is under control of head x, 
then ALPHA is said to be "headed by X." If alpha is 
not under control of any head instruction, then alpha 
is said to be "headed by blank." 

A symbol, alpha, headed by the character X, is not 
identical with the symbol xalpha. The leading charac- 
ter is essentially on a different level from the characters 
which make up the symbol. However, alpha headed 
by a blank should be regarded as identical to the sym- 
bol ALPHA used without a heading statement. 

If a head statement with a nonblank character does 
not occur in the entire source program, all considera- 
tions of heading can be ignored. 

A HEAD statement with a blank character must be 
used if the programmer desires to modify the heading 
process in the example. Note that the statement head 
and the statement head 0 are quite different. For ex- 
ample, if block Bi and B2 are to be joined in one pro- 
gram, and B2 must be nested somewhere in the middle 
of Bi, as follows; 

Operation Operands 

. ^ first part of block Bi 

HEAD X 

. j. block B2 

HEAD 

. ^ second part of block Bi 

the entire program might have been prefaced by a head 
statement with a blank character operand. As implied 
previously, however, such a head instruction is super- 
fluous, since the symbols in the first part of block Bi are 
automatically headed by blank, being under the control 
of no head instruction at all. 

Often it is inconvenient to refer to a symbol that is 
defined in another headed region because of the re- 
quirement that the symbol be six characters in length. 
To facilitate cross referencing between headed blocks, 
the following convention can be used: 

Suppose that a symbol, say sum, under head 1, has 
been defined by some instruction. Suppose further that 
this symbol is to be referred to in an instruction under 
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the control of the instruction head 2, Then the desired 
reference can be made by writing 1$sum as it appears 
in the following instructions. 
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In general, if the two-characters "C$", where C is any 
allowable heading character, is placed in front of the 
headed reference symbol sum, then the result is sum 
headed by C. To specify sum headed by blank, one 
simply^writes $sum, with no character preceding the $ 
character. 

If the processor finds an operand containing a six- 
character symbol plus a head character, such as 9com- 
MON, the processor wiU produce an error message indi- 
cating that the symbolic address contains more than six 
characters ( see error messages, ER 5 ) . 

If a label is used in a head statement, it is ignored. 

TCD — Transfer Control and loaD 

The TCD statement may be used to cause the processor 
to produce an unconditional branch instruction. When 
this instruction is encountered during the loading of the 
object (machine language) program, it causes the 
loader to stop the normal loading process and to branch 
to the location (addr) specified in the operand. 
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ADDR may be actual or symbolic. 

This statement allows programs which are too large 
to fit into core storage to be loaded and executed piece- 
meal, by terminating each piece with a tra statement. 
In eflFect, a tcd instruction can be used in conjunction 
with a DORG statement to execute portions of the pro- 
gram that have already been loaded into storage and to 
overlap these with other instructions. 

Whenever the processor encounters a tcd statement, 
it causes the arithmetic tables, an unconditional branch 
instruction, and the loader program, to be punched into 
the object program tape or cards in that order. There- 
fore, when the object program is being loaded, the arith- 
metic tables will be loaded into storage before the 
branch occurs. Because the arithmetic tables are loaded 
into a portion of storage previously occupied by the 
loader program, the loader program will be destroyed. 



However, it will be restored (again loaded into stor- 
age) when a tra statement is encountered in the object 
program. That statement will be at the end of the por- 
tion of the object program that has been executed. 

During assembly, the tcd instruction does not aflFect 
the location assignment counter or alter the symbol 
table. 

TRA — Transfer to Return Address 

The TRA statement causes the normal loading sequence 
of an object program to be resumed once it has been 
broken by a tcd statement. When a tra statement is en- 
countered by the processor, a read-a-record (card or 
tape) instruction and an unconditional branch instruc- 
tion to the loader program are produced in the object 
program. This processor control operation increments 
the location assignment counter by 24. The last state- 
ment of that part of a source program that is executed, 
when loading is interrupted by a tcd statement, must be 
a TRA statement. When the tra instruction equivalences 
are encountered in the object program, the program 
loader is reloaded and the normal loading process con- 
tinues. The TRA statement, which takes the following 
form, uses no operands. 
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The following example illustrates the use of the tcd 
and TRA mnemonics. 
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The TCD statement causes a branch to the location as- 
signed to the symbol start, followed by the execution 
of instructions from start through the tra statement. 
The TRA statement causes a branch to the load program, 
which resumes loading of the remainder of the object 
program beginning with the location labeled start. 

The use of a macro-instruction preceding a tcd state- 
ment is not allowed. 
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1620 Subroutines 

A program or routine is a set of coded instructions that 
are arranged in a logical sequence; it is used to direct 
the 1620, or any ibm data processing system, to perform 
a desired operation or series of operations. Generally, 
programs contain one or more short sequences of in- 
structions that are parts or subsets of the entire program 
and that are used to solve a particular part of a prob- 
lem. These parts of the program or routine are called 
subroutines. 

Usually, a subroutine performs a specific function, is 
common to a number of programs, and may be executed 
several times during the course of the program of which 
it is a part (main program). For example: a subroutine 
that extracts the square root of a number may be re- 
quired several times during the execution of a pipe 
stress analysis program. The same subroutine may be 
used to extract a square root in a bridge and truss design 
program. 

An eflScient programming procedure is obviously one 
in which all necessary subroutines are coded only once, 
are retained on file, and are incorporated into a program 
whenever the operation performed by the subroutine is 
required, ibm Programming Systems has developed a 
group of subroutines that are more frequently required 
because of their general applicability. Seventeen sub- 
routines are available; they fall into three general cate- 
gories: arithmetic, data transmission, and functional. 

Arithmetic subroutines 

Floating Point Add 

Floating Point Subtract 

Floating Point Multiply 

Floating Point Divide 

Fixed Point Divide 
Data transmission subroutines 

Floating Shift Right 

Floating Shift Left 

Transmit Floating 

Branch and Transmit Floating 
Functional subroutines 

Floating Point Square Root 

Floating Point Sine 

Floating Point Cosine 

Floating Point Arctangent 

Floating Point Exponential (natural) 

Floating Point Exponential (base 10, common) 

Floating Point Logarithm (natural) 

Floating Point Logarithm (base 10, common) 

The methods used by the functional floating point 
subroutines to evaluate the functions of arguments are 
shown in Table 9. 



Table 9. Subroutine Method for Evaluating Arguments 





METHOD 


SUBROUTINE 


FIXED LENGTH 


VARIABLE LENGTH 


Square Root 


Odd integer 


Odd integer 


Sine and 
Cosine 


Based on Hastings' 
approximation* 


Series approximation 


Arctangent 


Truncated series 


Series approximation for 
arc tangent 


Exponential 
(natural and 
base 10) 


Hastings' c^proximation 

B B 
10 . 10 is converted 

.oe"* 


Series approximations of 

B B 

10 and convert to e 


Logarithm 
(natural and 
base 10) 


Truncated series for 
In B. In B is converted 
to log 10^ 


Series approximation of 
In B and convert to tog B 



* Hastings, Cecil Jr., Approximations for Digital Computers, 
Princeton University Press, Princeton, New Jersey. The 
Rand Corporation, 1955. 



The combined subroutines are written in machine 
language and are provided in card or paper tape form 
for floating point numbers with either a fixed-length or 
variable-length mantissa. The term "variable length" or 
"fixed-length," as applied to subroutines in this manual, 
refers to the number of digits (L) in the mantissa, not 
to the length of the subroutine itself. 

The five types of subroutine card decks or paper tapes 
are: 

1. Fixed length subroutines for machines not 
equipped with the automatic divide feature. 

2. Fixed length subroutines for machines equipped 
with the automatic divide feature. 

3. Variable length subroutines for machines not 
equipped with the automatic divide feature. 

4. Variable length subroutines for machines equipped 
with the automatic divide feature. 

5. Variable length subroutines for machines equipped 
with automatic floating point feature (automatic 
divide feature, prerequisite). 

Although type 2 and type 4 subroutines are designed 
to work with the automatic divide feature, the "fixed 
point divide" subroutine is included as part of the sub- 
routine package. Type 5 variable length subroutines 
that are designed to work with the automatic floating 
point feature include a complete set of subroutines as 
part of the package. 
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A PICK subroutine is included in the object program 
with any of the 17 subroutines previously mentioned. 
This subroutine performs the function of getting the 
data specified for a subroutine and storing the result 
produced by that subroutine. 

The processor selects the subroutines used by the 
source program that are to be included in the object 
deck or tape. When the object deck or tape is loaded, 
the subroutines are loaded to the first even-numbered 
address following the object program. Although this ad- 
dress is assigned by the processor, care must be exer- 
cised by the programmer to provide a storage area, be- 
tween the position assigned by the processor and posi- 
tion 19999 (standard capacity machine), that is large 
enough to accommodate the subroutines called for. To 
find the amount of storage required for the subroutines, 
the programmer may total the storage requirements of 
the subroutines used. 

The fixed point divide subroutine (div) is used by 
some floating point functional subroutines. For this 
reason it will automatically be incorporated into a pro- 
gram which uses these subroutines when the machine 
used to run the program is not equipped with automatic 
divide. 

In addition to the subroutines provided, the user may 
include up to twelve subroutines of his own. The meth- 
od used to incorporate these routines into a program is 
explained under adding subroutines 
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Data Transmission Subroutines Macro-instructions 
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Functional Subroutines Macro-instructions 
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Subroutine Macro-Instructions 

All linkages for the 1620 subroutines are generated 
automatically through the use of certain macro-instruc- 
tions. The programmer places the macro-instruction that 
is related to a particular subroutine in the source pro- 
gram at the point at which the subroutine is desired. 
This causes the sps processor, during assembly, to gen- 
erate linkage to the desired subroutine. In addition, the 
processor arranges for the subroutine to be added to the 
object program. 

The data and addresses required by the subroutine 
and supplied in the macro-instruction are incorporated 
into the linkage instructions where they are made avail- 
able for use. In this way the subroutine obtains the in- 
formation it requires to perform its given task and also 
to compute a return address to the main program. Con- 
trol is returned to the main program at the completion 
of the subroutine by transferring to the return address. 
The macro-instruction statement related to each subrou- 
tine is as follows: 



In the arithmetic statements, the B operands repre- 
sent the addresses of quantities to be added, subtracted, 
etc., to quantities at addresses specified by the A oper- 
ands. For the fixed point divide routine, two additional 
operands, Al and Bl, are required. These operands, as 
well as the A and B operands, are explained in greater 
detail under each macro-instruction as it is described. 
In the data transmission statements, the B operand gen- 
erally represents the address of the field to be trans- 
mitted, whereas the A operand represents the address 
to which the field is to be transmitted. The function of 
the A and B operands differs slightly for functional sub- 
routine macro-instructions. In this case, the B operand 
represents the address of the argument to be evaluated 
and the A operand represents the address where the re- 
sult is to be placed in storage. 

Indirect addressing can be used with the operands of 
all macro-instructions on machines with or without the 
automatic floating point feature. To indicate an indirect 
address, an operand should be preceded by a minus 
sign. An indirect address in the form xxxxx is generated 
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by the processor. A flag is automatically placed in the 
leftmost and rightmost positions of the address. If in- 
direct addressing is attempted on a machine that does 
not have the indirect addressing feature, the flagged 
operand is not interpreted as an indirect address. 

For each macro-instruction statement in a source pro- 
gram, two machine language linkage instructions, and 
a 5-digit address for each operand, are generated by the 
processor in the object program. These linkage instruc- 
itons replace the macro-instruction, which never ap- 
pears in the object program. A label written with a 
macro-instruction references the leftmost position of the 
first linkage instruction generated. If the programmer 
wishes to use this label in address adjustment, he must 
remember that the instruction location following a 
macro-instruction is not label + 12. 

When using a macro-instruction, the programmer 
must code the exact number of operands required for 
that macro-instruction. Every macro-instruction must 
have at least two operands. Remarks and flag operands 
are not permitted in macro-instructions. Omitted oper- 
ands require the insertion of commas as in Imperative 
statements. 

All operands in macro -instructions may be symbolic 
or actual; all are subject to address adjustment. If an * 
is used as an operand, its address is that of the left-most 
position of the first linkage instruction. 

The linkage instructions generated for a macro-in- 
struction by the processor are equivalent to the follow- 
ing series of symbolic instructions: 
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where pick is the address of the first instruction in the 
Pick subroutine; subr is the secondary linkage for the 
desired subroutine (the subroutine specified by the 
macro-instruction); and A, B, C, D. . .are the series of 
5-digit addresses or constants that are equivalent to the 
operands specified by the macro-instruction. This link- 
age allows the macro-instruction to contain any number 
of operands, an ability that is significant for "adding 
subroutines.'' 

During execution of the object program, the sec- 
ondary linkage instructions set up the address of the 
first instruction in the desired subroutine as a part of one 
of the instructions in the Pick subroutine. Secondary 
linkage instructions are generated by the processor for 
each subroutine used by the source program. They are 
equivalent to the following symbolic instructions. 



For arithmetic subroutines ( not including div ) : 
SUBR TFM PICK + 402, ADDR 
B PICK 

For data transmission subroutines (not including 

FSRS, FSLS); 

SUBR TFM PICK + 402, ADDR 
B PICK + 104 
For functional subroutines: 
SUBR TFM PICK + 402, ADDR 
B PICK + 104 
For div, fsrs, and fsls subroutines: 
SUBR TF ADDR + H, PICK + 11 
B ADDR 

PICK is the address of the first instruction of the Pick 
subroutine, and addr is the actual address where the 
first instruction of the desired subroutine is located. In 
the secondary linkage, pick -f- 402 is the address equiva- 
lent for the variable length subroutines only. That ad- 
dress should be replaced by pick -f- 414 for fixed length 
subroutines. For variable length subroutines using the 
floating point feature, the secondary linkage instructions 
generated are equivalent to the following symbolic in- 
structions: 

For arithmetic subroutines: 
SUBR TF ADDR H- 11, PICK + 11 
B ADDR 

For data transmission subroutines (not including fsrs, 

FSLS ) : 

SUBR TF PICK + 174, ADDR 
B PICK + 24 
For functional subroutines: 
SUBR TF PICK + 174, ADDR 
B PICK + 24 
The subroutine card deck or paper tape will contain 
the subroutines in the order shown. All except the first 
three are floating point subroutines. 

1. Subroutine Processor 

2. Pick 

3. Divide (fixed point) 

4. Subtract — Add 

5. Multiply 

6. Divide 

7. Square Root 

8. Cosine — Sine 

9. Arctangent 

10. Exponential (natural 
and base 10 ) 

11. Logarithm (natural 
and base 10) 

12. Shift Right 

13. Shift Left 

14. Transmit Floating 

15. Branch and Transmit 
Floating 
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Many subroutines have been paired (i.e., add and 
subtract, sine and cosine, natural and base 10 exponen- 
tial, natural and base 10 logarithm), into single subrou- 
tines to conserve storage by sharing program steps 
which are common to both. The individual subroutines 
within each pair are distinguished from each other 
solely by the point at which they are entered. The cor- 
rect entry point is obtained through use of the macro- 
instruction pertaining to the particular subroutine de- 
sired. 

Because the arctangent subroutine and both log- 
arithm subroutines (natural and base 10) require the 
fixed point divide routine, the macro-instructions fatn, 
FLN, and FLOG cause the fixed point divide subroutine to 
be added to the object program output (provided the 
machine is not equipped with automatic divide). For 
thcvfixed length mantissa subroutines, any of the previ- 
ously listed subroutines 3-8, 10, 12-15, may be called for 
and added to the object output without caUing any 
other subroutine; i.e., floating add-subtract may be 
called without calling floating multiply. For the variable 
length mantissa subroutines, any of the four arithmetic 
macro-instructions (fa, fs, fm, fd) will cause all three 
arithmetic subroutines ( 4. floating add-subtract, 5. float- 
ing multiply, and 6. floating divide ) to be called for and 
added to the object program output. However, the 
other subroutines may be called for independently of 
each other. 

In the object program output, each subroutine except 
the Pick subroutine is preceded by its secondary link- 
age. However, when the object program is loaded, the 
secondary linkages for all of the subroutines are stored 
in storage positions that immediately follow the object 
program, starting with the first even-numbered address. 
PICK and other subroutines are loaded into sequentially 
higher addresses ( in the order previously listed ) . 

The subroutine processor is loaded into an area of 
storage which is occupied by the sps processor, thereby 
destroying a portion of the sps processor. To restore the 
SPS processor to its original status, the part destroyed 
must be reloaded after selection of the subroutines is 
completed. Restoration of the sps processor is accom- 
plished automatically with the data which follows the 
last subroutine of the subroutine deck or tape. This data 
includes the loader, arithmetic tables, and that part of 
the SPS processor previously destroyed. The subroutine 
processor is never a part of the object program output 
or final object program . 

Floating Point Aritttmetic 

Scientific and engineering computations frequently in- 
volve lengthy and complex calculations necessitating 
the manipulation of numbers that may vary widely in 



magnitude. To obtain a meaningful answer, problems 
of tfiis type usually require retention of as many signi- 
ficant digits as possible during calculation, and correct 
positioning of the decimal point at all times. When the 
computer is used for such problems, several factors must 
be considered, of which the most important is the loca- 
tion of the decimal point. 

In general, a computer does not recognize the pres- 
ence of a decimal point in any quantity during calcula- 
tion. A product of 41454 results whether the factors are 
9.37 X 44.2; 93.7 x .442; or 937 x 4.42; etc. The program- 
mer must be cognizant of the location of the decimal 
point during and after the calculation and arrange the 
program accordingly. In adding, the decimal points of 
all numbers must be lined up to obtain the correct sum. 
The programmer facilitates this arrangement by shifting 
the quantities as they are added. In the manipulation of 
numbers that vary greatly in magnitude, it is conceiv- 
able that the resulting quantity could exceed allowable 
working limits. 

Processing numbers expressed in ordinary form, e.g., 
427.93456, 0.0009762, 5382, -623.147, 3.1415927, etc., 
can be accomplished on a computer only with extensive 
analysis to determine the size and range of intermediate 
and final results. The percentage of time required for 
this analysis and subsequent number scaling is fre- 
quently much larger than the percentage of time re- 
quired to perform the actual calculation. Moreover, 
number scaling requires complete and accurate in- 
formation regarding the bounds on the magnitude of all 
numbers that come into the computation ( input, inter- 
mediate, output). Since prediction of the size of all 
numbers in a given calculation is not always possible, 
analysis and number scaling are sometimes impractical. 

To alleviate this programming problem, a system 
must be employed which provides information regard- 
ing the magnitude of all numbers in the calculation 
along with the quantities in the calculation. Thus, if all 
numbers are represented in some standard, predeter- 
mined format that instructs the computer in an orderly 
and simple fashion as to the location of the decimal 
point, and if this representation is acceptable to the 
routine that performs the calculation, then quantities 
that range from minute fractions having many decimal 
places to large whole numbers having many integer 
places can be handled. The arithmetic system most com- 
monly used, in which all numbers are expressed in a 
format that has these characteristics, is called "floating 
point arithmetic." 

The notation used in floating point arithmetic is 
basically an adaptation of the scientific notation that is 
widely used today. In scientific work very large or very 
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small numbers are expressed as a number, between one 
and ten, times a power of ten. Thus, 

427.93456 is written as 4.2793456 x 10\ 

and 0.0009762 is written as 9.762 x 10"* 
In the 1620 floating point arithmetic system, the range 
of the fracjtional part of the number is modified to ex- 
tend between .10 .... 000 and .99 ... . 999, that is, the 
decimal point of all numbers is placed to the left of the 
high-order (leftmost) nonzero digit. Hence, all quan- 
tities may be thought of as a decimal fraction times a 
power of ten. For example, 

427,93456 becomes .42793456 x 10^ 

and 0.0009762 becomes .97620000 x 10^ 
where the fraction is called the mantissa, and the power 
of ten, indicating the number of places the decimal 
point was shifted, is called the exponent. The use of 
floating point numbers during processing, besides offer- 
ing advantages inherent in scientific notation, eliminates 
the need for analyzing operations in order to determine 
the positioning of the decimal point in intermediate and 
final results, since the decimal point is always immedi- 
ately to the left of the high-order, nonzero digit in the 
mantissa. 

In 1620 floating point operations, a floating point 
number is a field consisting of a variable length or fixed 
length mantissa and a 2-digit exponent. The exponent is 
in the two low-order positions of the field, and the man- 
tissa is in the remaining high-order positions, as shown: 

M MEE 

For the subroutines, the variable length mantissa may 
have a minimum of two digits and a maximum of 45 
digits. Two operand fields that are added together must 
have mantissas of the same length. A flag over the high- 
order digit marks the extremity of the field. A fixed 
length mantissa must have eight digits. 

The exponent is established on the premise that the 
mantissa is less than 1.0 and equal to or greater than 0.1. 
It always consists of two digits ranging between —99 
and 4-99. A flag over the high-order (tens) digit defines 
the exponent. 

The high-order digit of the mantissa and the high- 
order digit of the exponent must contain flag bits to 
operate properly with floating point subroutines. 

The mantissa and the exponent, if negative, must have 
an algebraic sign, represented by a flag, over the units 
position of the respective fields; if they are positive, they 
are not flagged. A floating point number with a nega- 
tive mantissa and a negative exponent is represented as 
follows; 

M MEE 

Sign control of the results of all computations is main- 
tained according to the standard rules of arithmetic 
operations. 



In all floating point numbers the decimal point is 
assumed to be at the left of the high-order digit, which 
must be a nonzero digit. Such a number is referred to as 
normalized. When a number has one or more high-order 
zeros, it is considered to be unnormalized. An unnor- 
malized number resulting from a floating point sub- 
routine computation is normalized automatically, but 
unnormalized terms are not recognized as such when 
entered as data. Therefore, it is necessary for all data 
to be entered in normalized form. Although unnormal- 
ized numbers will be processed, correct results cannot 
be assured. For example, the number 0682349405 should 
be entered as 6823494004, assuming the fixed point num- 
ber is 6823.494, and an 8-digit mantissa is required. 

The floating examples demonstrate the conversion of 
numbers in ordinary form to 1620 floating point nota- 
tion for an 8-digit mantissa. 



NUMBER 

123.45678 
.00765438 
-.12348693 
-.00000070 
.00000000 



NORMALIZED 

.12345678 x 10^ 
.76543800 x 10-^ 
-.12348693 x 10« 
-.70000000 X 10-^^ 
.00000000 X 10-^^ 



1620 FLOATING 
POINT 

1234567803 
7654380002 
1234869300 
7000000006 
0000000099 



Note: A zero mantissa is associated with a 99 exponent. 

The result of a floating point operation is normalized 
automatically. For example, the result .00123456 when 
normalized becomes 123456NN02, where N is an in- 
serted digit and 02 is the exponent. The value of the N 
digit ( 0 through 9 ) is determined by the programmer, 
who in most cases will choose to use zero. The storage 
location of the N digit is the first odd-numbered location 
following the last secondary linkage of the assembled 
program. The programmer must always store the N 
digit. He may do this by using the following statements, 
where the constant (N digit) is zero. 
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In normalizing, certain low-order digits in a mantissa 
may lose significance. To recognize these digits, the 
floating point arithmetic can be performed twice, using 
a different N digit for each run, e.g., zero for the first run 
and nine for the second run. The significance of these 
digits can be readily distinguished by comparing the 
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two results. For example, if the programmer compares 
the following: 

Mantissa Exponent 
Result, 1st run .12345000 04 
Result, 2nd run .12345099 04 

he will see that the two low-order positions of the man- 
tissa have lost significance because they are significantly 
different. 

When intermediate floating point results enter into 
additional floating point calculations, inserted digits 
may become a part of the result of the additional cal- 
culation. 

In the case of lengthy computations using floating 
point results, precision gradually decreases because of 
truncation. The magnitude of the truncation error de- 
pends on the individual computation process and can- 
not be predicted without a knowledge of the process in 
question. However, the truncation error in such cases 
is usually no greater than the degree of error present 
in a rounded amount. Results in floating point subrou- 
tine are not rounded. The maximum truncation error 
for a fixed length mantissa will not exceed 10~^ or for a 
variable length mantissa, 10"^, except under certain 
conditions described in the explanation of floating point 
functional subroutines. 

Exponent Overflow and Underflow 

In the 1620 floating point subroutines, numbers with a 
magnitude equal to or greater than 10'-^^ create a condi- 
tion called exponent overflow; those with a magnitude 
of less than lO "^'^ create a condition called exponent 
underflow. If either of these conditions is generated as 
a result of an arithmetic operation, the programmer has 
two options. 

Overflow 

1. To halt the program or 

2. To cause 9 . . 999 to be placed in the result field 

and to continue executing the subroutine. 

Underflow 

1. To halt the program or 

2. To cause 5 ()S9 to be placed in the result field 

and to continue executing the subroutine. 

The options function independently of each other. 
Therefore, it is possible to halt on an overflow and place 
zeros in the result field on an underflow, or to halt on an 
underflow, and place nines in the result field on an 
overflow. 

The detection of an overflow or underflow condition 
causes the subroutine being executed to examine core 
storage position 00401 to determine the course of action. 
Options available to the programmer must be repre- 
sented in position 00401 by one of the following 
characters. 



1 


UNDERF 

Halt 


LOW 

Store Zeros in 
Result Field 


V Halt 
E 

R 


0 


0 


F Sfore All 

L Nines In Result 

O Field 

W 


T 


1 



To store the code determining the option in 00401, an 
unlabeled Define Constant (dc) statement may be 
used, as shown in the following example: 



Lrn« 


Label 




Operands 4 Remorki 








2.,'0.,,4Di y.ALT AM OFLOW ok UNJiE.RfLOW. 



Positive codes ( 0 or 1 ) need not be preceded by a plus 
sign. 

Overflow and /or underflow conditions can only arise 
in six of the floating point subroutines presented in this 
manual; namely, the four arithmetic subroutines and 
the two exponential functional subroutines. 

If the subroutine halts on an overflow or underflow 
condition, the operator can continue processing by de- 
pressing the Start key on the console. In the case of an 
overflow, execution of the subroutine begins after 

9 999 is placed in the result field; in the case of 

an underflow, after 0 099 is placed in the result 

field. 



Description of 7620 Subroutines 

In this section, the various subroutines are described 
and examples are given to show how the associated 
macro-instructions are written. Table 10 shows the stor- 
age requirements for each subroutine. 

During execution of the arithmetic subroutines, the 
overflow, high /positive, and equal/zero indicators are 
used. The overflow indicator is always reset at the be- 
ginning of each arithmetic subroutine. If it is desired to 
determine its status prior to the execution of an arith- 
metic subroutine, the indicator must be tested and its 
condition stored before the linkage instructions are 
executed. The high/positive and equal/ zero indicators 
are set according to the mantissa of the result. When- 
ever a zero mantissa results (0 099), the equal/ 

zero indicator is turned on. 
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Table 10. Subroutine Storage Requirements and Identification Data 





NUMBER OF STORAGE POSITIONS REQUIRED 




FIXED LENGTH 


VARIABLE LENGTH 


SUBROUTINE 


WITHOUT 
AUTOMATIC 
DIVIDE 


WITH 
AUTOMATIC 
DIVIDE 


WITHOUT 
AUTOMATIC 
DIVIDE 


WITH 
AUTOMATIC 
DIVIDE 


WITH 
AUTOMATIC 
FLOATING POINT 


PICK 


872 


872 




1136 




1136 




896 


DIV 


1047 


187 




1035 




199 




199 


FA 
FS 


f 543 


f 543 




. 1207 




.1163 




► 639 


FM 


239 


239 








FD 


523 


335 














FSQR 


579 


579 


659 


659 




659 


FCOS 


f 867 
J 


f 867 
J 


1 1098 


|l054 


1 


' 1054 


FATN 


lU// 


OfiO 
TOT 


1487 


1379 




1379 


FEXT 
FEX 


r 820 


J 776 
J 


|l258 


J 1118 


) 


1118 


FLOG 
FLN 


f 886 


•■■•] 

f 842 


j 1209 


f 1145 


1 


1145 


FSRS 


279 


279 




279 




279 




96 


FSLS 


372 


372 




372 




372 




96 


TFLS 


31 


31 




31 




31 




31 


BTFS 


79 


79 




79 




79 




43 


Identification 
Number ( Col, 77 
of cord deck 


2 


3 


4 


5 


6 



At the conclusion of a functional subroutine, the 
status of the high /positive, equal/zero, and overflow 
indicators does not necessarily reflect the result of the 
operation, because the indicators are disturbed during 
the execution of a functional subroutine. Therefore, 
their status at the conclusion of a functional subroutine 
should not be assumed to be the same as it was prior 
to the execution of the subroutine. 

Pick 

This subroutine is common to all fixed length and vari- 
able length mantissa subroutines. The pick subroutine, 
during execution of the object program: 



1. Sets up A and B operands (more, if designated) 
to be operated upon, calculates the return address 
to the mainline program, and branches to the sub- 
routine. 

2. Stores the calculated result in the proper storage 
area and branches back to the mainline program. 

3. Initiates typing of error messages and branches to 
the subroutine if the error condition allows proc- 
essing of the subroutine to be resumed. 

4. Provides constants and working storage for the 
other subroutines. 
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The average execution time for the pick subroutine 
can be determined by the formula: 

Average time (in /xs) lOOL + 8320 
where L equals the length of the mantissa and the num- 
bers are expressed in microseconds. Therefore, an 8- 
digit mantissa (same as fixed length mantissa) requires 
9120 fis, 

100 X 8 = 800 
8320 

9120 (ixs) 

or approximately 9 milliseconds (ms). If indirect ad- 
dressing is used, the average time is increased according 
to the number of levels of indirect addressing used. 

Note: For the variable length subroutines used with 
the automatic floating point feature, 
Average time (in /as) = lOOL + 4500 
Th6 above timings apply to object programs being 
executed on the 1620 Model 1. The 1620 Model 2 timings 
for the Pick subroutine are: 

Fixed length and variable length 
Average time (in ^s) = 318L + 2470 

Floating Add 

Macro-instruction 



lint 










Op«randt & RvmoHn 


1 i 


t n 


It —il 




M » M 


40 «S » 








A,,M 



The A and B addresses refer to the units position of the 
exponents of the fields: 
MMMMMMMMEE 

t 

address of field 
where Ms represent digits of the mantissa and Es repre- 
sent digits of the exponent. 

Operation 

Field B is added to field A. The floating point sum re- 
places field A; field B remains unchanged. 

Average Execution Time (1620 Model 1) 

Fixed length 

Average time = 9 ms 
Variable length 

Average time (in /xs) =: 5L- + 482L + 6854 
where L = length of mantissa 

Average Execution Time (1620 Model 2) 
Fixed length 

Average time ~ 4,100 /as 
Variable length 

Average time ( in /xs) = 70L + 3420 
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Floating Subtract 

Macro-instruction 



Line 


f , " 
















The A and B addressee refer to the units position of the 
exponents of the fields: 

Operation 

Field B is subtracted from field A. The floating point 
difference replaces field A; field B remains unchanged. 

Average Execution Time (1620 Model 1) 

Fixed length 

Average time 10.5 ms 
Variable length 

Average time (in /xs) = SL^ + 482L -f- 7474 

Average Execution Time (1620 Model 2) 
Fixed length 

Average time — 4,200 /xs 
Variable length 
Average time (in /its) = 70L -f- 3500 

Floating Multiply 

Macro-instruction 



Lin« 


Lob«l 






Op«rond» & Ramorfct 


i_ » 


* .. " 


»2 15 


U M M 30 


U 40 4$ M 








A*B 



The A and B addresses refer to the units position of the 
exponents of the fields: 

Operation 

Field A is multiplied by field B. The floating point prod- 
uct replaces field A; field B remains unchanged. 

Average Execution Time (1620 Model 1) 
Fixed length 

Average time = 18 ms 
Variable length 

Average time (in/xs) = ISSU + 240L + 7400 

Average Execution Time (1620 Model 2) 
Fixed length 

Average time — 5,300 /xs. 
Variable length 

Average time (in /xs) = 36.6L2 + 48L -h 3420 



Floating Divide 

Macro-instruction 



Lint 


Lab«t 


Oparotion 




Op«randt & tamariit 


1_ s 




)2 15 


I« » » 1 


0 U iO 4S M 


fli^l .0 






, 



Operation 

Field A is divided by field B. The floating point quotient 
replaces field A; field B remains unchanged. 

Average Execution Time (1620 Model 1) 
Fixed length 
With automatic divide 

Average time = 55 ms 
Without automatic divide 
Average time = 70 ms 
Variable length 

With automatic divide 

Average time (in ^s) - 520L^^ + 1500L + 7890 
Without automatic divide 

Average time (in ^ms) = 1.9(520L=^ + 1500L + 
7890) 

Average Execution Time (1620 Model 2) 
Fixed length 

Average time = 10,900 jus 
Variable length 

Average time (in ^is) = 98.5L'^ + 200L + 3490 

Fixed Point Divide 

Macro-instruction 



Lin* 


Lob«l 


Op«rt»km 




Operands & Ktmerii* 






11 .$ 


14 » » X 


u « 4 SO 








A,fi,Al,Bl 



In addition to the A and B operands, representing the 

addresses of the dividend and divisor, the divide macro- 
instruction requires two additional operands; one spe- 
cifies the number of zeros to be inserted to the right of 
the dividend ( Al operand) and the other, the shift fac- 
tor needed by the subroutine (Bl operand). Specific- 
ally, the 

A operand is the core storage address of the 
dividend. 

B operand is the core storage address of the divisor. 

Al operand is 00099 minus the number of zeros de- 
sired to the right of the units position 
of the dividend. 

Bl operand is 00100 minus the length of the quo- 
tient. The quotient must be at least two 
digits in length. 



Note: The quotient address after the division is exe- 
cuted will be ecjual to 00099 minus the length of 
the divisor. 

Prior to the divide operation, the divide subroutine 
always resets to zeros (clears) the positions 00080 
through 00099, the product area where the 20-digit quo- 
tient and remainder are developed. For the variable 
length mantissa subroutines, where L ( length of man- 
tissa ) is greater than 10, the number of positions which 
are reset to zeros is equal to 99 — 2L. When the quotient 
plus the remainder exceeds the number of positions 
cleared to zeros, positions lower than the last position 
cleared must be reset to zeros by programming. One 
additional position should also be cleared to allow for 
a possible overdraw. For example, if 25 positions are 
required for the quotient and remainder in a fixed length 
mantissa subroutine, 00074-00079 will have to be reset to 
zeros before the divide macro-instruction is given. 

The fixed point divide macro-instruction may be used 
with any of the subroutine packages. Whenever it is 
used, the fixed point divide subroutine will be incor- 
porated into the users program. For the subroutine 
packages that are designed to work with automatic 
divide, the fixed point divide subroutine uses auto- 
matic divide in performing its operation. For the sub- 
routine packages that are designed to work without the 
automatic divide feature, the fixed point divide subrou- 
tine performs its operation as instructed by the routine 
without the aid of the automatic divide feature. Coding 
of the macro-instructions is the same for all of the sub- 
routine packages. 

Operation 

The product area (00080-00099) is automatically reset 
to zeros. The dividend ( A address ) is transmitted to the 
product area ( Al address ) , beginning at the low-order 
dividend digit and terminating at the flag bit marking 
the high-order position of the dividend field. The Al 
address is 00099 minus the number of zero positions de- 
sired to the right of the dividend. 

The algebraic sign of the dividend is automatically 
placed in location 00099, regardless of where the right- 
most dividend digit is placed by the Al address. A flag 
bit automatically marks the high-order digit of the divi- 
dend. 

The divisor (B address) is successively subtracted 
from the dividend. The Bl address of the divide macro- 
instruction positions the divisor for the first subtraction 
from the high-order position(s) of the dividend, as in 
manual division. The Bl address is determined by sub- 
tracting the number of digits in the quotient from 100. 
For the subroutines using program divide, the value of 
Bl must be between 0 and 99. For subroutines using 
automatic divide, the value of Bl is not restricted. 
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The quotient and remainder replace the dividend in 
the product area. The address of the quotient is 00099 
minus the length of the divisor. The algebraic sign of 
the quotient ( determined by the signs of the dividend 
and divisor) is automatically placed in the low-order 
position of the quotient. The address of the remainder 
is 00099 and a flag bit is automatically placed in that 
position. The remainder has the sign of the dividend 
and the same number of digits as the divisor. 

The high/positive indicator is on if the quotient is 
positive and not zero; the equal/zero indicator is on if 
the quotient is zero. Neither indicator is on if the quo- 
tient is negative. 

The quotient must be at least two digits in length. 
One position is required for the sign and one for the field 
rriark (flag bit). 

Examples 

1. The macro-instruction 

DIV A, B, 99, 96 
will perform the division for 0273 ) 3972 and store 
the result 0014 in storage locations 00092,through 
00095. 

2. The macro-instruction 

DIV A, B, 96, 93 
will perform the division for 0273 ) 3972.000 and 
store the result 0014.549 in storage locations 00089 
through 00095. 

Note: In both examples (1 and 2), A represents the 
address of the dividend 3972 and B represents 
the address of the divisor 0273. 

Incorrect Positioning of Divisor 

The following error conditions are caused by an incor- 
rect Bl address. 

An incorrectly positioned divisor can cause more than 
nine successful subtractions and an incorrect quotient. 
The divide operation is terminated, the Overflow indi- 
cator and Overflow Arithmetic Check light are turned 
on, but processing will not stop unless the Overflow 
Check switch is set to stop. 

The high-order digit of the dividend is assumed by 
the 1620 to be one position to the left of the high-order 
digit of the divisor. The high-order digits of the divi- 
dend are lost if the divisor is positioned too far to the 
right. Processing continues with no indication of an 
incorrect quotient. 

If the B address is less than 10000, i.e., between 00100 
and 09999, the divide operation will terminate when a 
subtraction occurs at 0XX99. This, in effect, restricts the 
size of the dividend to 10,020 digits if only 20,000 posi- 
tions of core storage are installed. 



Average Execution Time ( 1620 Model 1) 

Fixed length and variable length with automatic 
divide 

Average time (inms) = 980 + .040 ldvd -f- 

(.520 LDVR -h .740) 
(100 -Bl) 
where ldvd is length of the dividend field, 

LDVR is length of the divisor field, and 

Bl is value specified in the macro-instruction. 

Note; Multiply 3,2 times the result to find the average 
execution time for the fixed length and variable 
length subroutines without automatic divide. 

Average Execution Time (1620 Model 2) 

Fixed length and variable length without automatic 
divide 

Average time (in ms) — 8.265 -h .015 ldvd -f 

(.465 -h .027 ldvr) 
(100- Bl) 
where ldvd is length of the dividend field, 
LDVR is length of the divisor field, 
and Bl is the value specified in the macro- 
instruction. 

Floating Shift Right 

MatrO'instruction 



Lin* 
1 I 


Lob«l 


Operation 

1} 15 


Operands & Remarks 

U 3« » 30 3S 40 4S SO 








A^,B 



The effect of this macro-instruction is to shrink the 
mantissa by shifting it to the right and truncating the 
low-order digits. The A address is normally the units 
position of the mantissa. 

MMMMMMMMEE 

units position 
of mantissa 

The B address specifies the digit of the mantissa 
which will become the low-order digit of the mantissa. 

Operation 

The field at the B address ( the portion of the mantissa 
to be retained) is shifted right to the location specified 
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by the A address. The exponent is not moved or al- 
tered. For example, the macro-instruction 

FSRS 00097,00093 

causes the mantissa 

30590011325701 

t t 

Storage Storage 

Address Address 
00093 00097 

to be shifted, producing the following result 

00003059001101 

Storage Storage 
Address Address 
00093 00097 

Vacated high-order positions are set to zeros. An exist- 
ing flag at the A address is retained for algebraic sign; 
the field flag bit is transmitted with the high-order 
digit of the B field. 

Average Execution Time (1620 Model 1) 
Fixed length and variable length 
Average time (in /xs) = 4960 + 960L — 880 (A 

-B) 

Average Execution Time (1620 Model 2) 
Fixed length and variable length 

Average time (in fxs) = 2270 + 45 (A — B) 



The exponent is not moved or altered. For example, the 
macro-instruction : 

FSLS 00090, 00097 

causes the mantissa 

0011325701 

t t 

Storage Storage 

Address Address 



00090 



00097 



to be shifted, producing the following result 

T132570001 

t t 
Storage Storage 
Address Address 
00090 00097 

An existing flag bit at the B address is retained for 
algebraic sign; the field flag bit is transmitted with the 
high-order digit of the B field. 

Average Execution Time (1620 Model 1) 
Fixed length and variable length 
Average time (in /xs) - 6460 + 1520 

(B- A) -360L 



Average Execution Time (1620 Model 2) 

Fixed length and variable length 
Average time (in jas) 3830 -f 350(B 
7.5(B- A)2 



A) 



Floating Shift Left 

Macro4nstru€tion 



Transmit Floating 

Macro-instruction 



Line 


Lobel 


Operation 
13 15 


Operondj & Remofltj 

l« JO 7i 30 35 40 4i 50 


lioe 
1 5 


label 


Opefoiion 
1? 15 


Operondt & Remorki 

<1 K » W 15 40 45 50 


0.1,0 






..... . . . , 






rns 


AjS 



The eflFect of this macro-instruction is to expand the 
mantissa by shifting it to the left and filling the vacated 
positions with zeros. It is important to note that the B 
address is the low-order position of the field moved, 
and the A address is the high-order position of the re- 
sulting field. 

Operation 

The field at the B address, which is the low order 
digit of the mantissa, is shifted left so that the high order 
digit is moved to the location specified by the A address. 



The B address refers to the low-order digit of the float- 
ing point field exponent, whereas the A address refers to 
the low-order position to which the field is transmitted. 

Operation 

The field at the B address is transmitted to the location 
specified by the A address. The B field remains un- 
changed in storage. Flag bits in the three low-order 
positions of the B field are also transmitted; starting 
with the fourth low-order position, only one additional 
flag bit is transmitted, and it stops transmission. For the 
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variable length subroutine, L must be <49, where L 
equals the number of mantissa digits in the field to be 
transmitted. For the fixed length subroutine, L must be 
< 19. 

Average Execution Time (1620 Model 1) 

Fixed length and variable length 
Average time (in /^s) =: 400 + 40L 

Average Execution Time (1620 Model 2) 
Fixed length and variable length 
Average time ( in jus ) = 530 + 15L 

Branch and Transmit Floating 

Macro-instruction 



Line 


Label 


Operalion 




Operands & Reniorkt 


3 i 




1} IS 




tt M M 4) M 


D.I .0 




BTF^S 


\,M , 



The B address is normally the low-order position of the 
floating point field exponent, whereas the A address is 
the leftmost position of the next instruction to be exe- 
cuted. 

Operation 

The address of the next instruction is saved at a storage 
location equivalent to btfs -f 78 and the field at the B 
address is transmitted to the A address minus one. The 
nonnal exit of a routine which is entered by a btfs is a 
Branch Back (bb) instruction. The instruction at the A 
address is the next one executed. The B field remains 
unchanged in core storage. Any flag bits in the three 
low-order positions of the B field are transmitted; 
starting with the fourth low-order position, only one ad- 
ditional flag bit is transmitted, and it stops transmission. 

Average Execution Time (1620 Model 1) 

Fixed length and variable length 
Average time (in /xs) =r 2280 -f- 40L 

Average Execution Time (1620 Model 2) 

Fixed length and variable length 
Average time (in /xs) — 645 -j- 15L 

Floating Square Root 

Macro-instruction 



LicM 
J—J 


LoM 


1} IS 


UIO » 303540 4tM 


t.ti9 






^ , , 



The A and B addresses refer to the units position of the 
exponents of the fields. 

Operation 

The square root of argument B is extracted and the re- 
sult, in floating point form, is stored at A. The argument, 
which must be in floating point form, is unchanged by 
the operation. 

The floating point square root subroutine accepts all 
numbers within the floating point range that are greater 
than or equal to zero. If the argument is less than zero, 
the subroutine executes a programmed halt. The oper- 
ator has two options: 

1. Using the information found in the halt instruction, 
he may branch back to the main routine, or 

2. Continue the execution of the subroutine and com- 
pute the square root of B. 

Average Execution Time ( 1620 Model 1) 

Fixed length 

Average time — 120 ms 
Variable length 

Average time (in^s) - e20U + 9776L -h 5328 

Average Execution Time (1620 Model 2) 

Fixed length 

Average time ~ 29 ms 
Variable length 

Average time (in /.s) z= lOOL^^ H- 2000L + 5500 

Floating Sine 

Macro-instruction 



1 s 


Lab«l 

t II 


Opwotion 
IJ IS 


Op«randt & Rtmorin 
30 » 3a 3S 40 45 w 


•iii9 






A.A 



The A and B addresses refer to the units position of the 
exponents of the fields. 

Operation 

The sine of argument B is computed and the result, in 
floating point form, is stored at A. The argument must 
be in radians and in floating point form. The computa- 
tion does not disturb the original value of the argument. 

The floating point sine subroutine accepts all numbers 
of floating range up to and including exponent 08 (fixed 
length mantissa) or L (variable length mantissa). The 
operator may branch back to the mainUne program as 
explained under sotrootine error messages. 

For arguments with exponents less than 03, the mag- 
nitude of the maximum truncation error in the mantissa 
of the result does not exceed 10"^. Accuracy in the man- 
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tissa of the result decreases as the size of the argument 
( exponent of 03 or greater) increases. The operator has 
the option of branching back to the main program or 
proceeding with the computation. Any result so com- 
puted will contain an error that varies directly with the 
magnitude of the exponent. 

Average Execution Time (1620 Model 1) 
Fixed length 

Average time = 150 ms 
Variable length 

With automatic divide 
Average time (in/xs) = 16SU -}- -f 
13340L + 4708 

Without automatic divide 

Average time (in jus) = 1.9 {168U + 3792L2 ^ 
13340L + 4708) 
Note; For all Floating Sine and Floating Cosine sub- 
routines, arguments greater than 27r are reduced 
by subtractions of 2^ until within range. There- 
fore, the time required to perform these sub- 
tractions should be added to the average time 
required for an argument less than 27r. 

Average Execution Time (1620 Model 2) 
Fixed length 

Average time — 33.3 ms 
Variable length 

Average time (in /xs) ^ 5L' + 320L- -|- 
3100L 4- 4900 

Floating Cosine 

MacrO'instruction 



Lin* 


lobcl 


Dptrotiofi 

12 15 


Operandi & Rcmorin 


0.1 .0 






A.,A 



The A and B addresses refer to the units position of the 
exponents of the fields. 

Operation 

The cosine of argument B is computed and the result, 
in floating point form, is stored at A. The argument must 
be in radians and in floating point form. The computa- 
tion does not disturb the original value of the argument. 

The allowable range of the argument, maximum ac- 
curacy, etc., for the cosine subroutine are the same as 
those previously described for the sine subroutine. 

Average Execution Time (1620 Model 1) 
Fixed length 
Average time = 155 ms 



Variable length 

With automatic divide 
Average time ( in /ts) zz 168L^ -(- 3792L2 + 
13420L + 5228 

Without automatic divide 
Average time (in /xs) = 1.9 (IGSL^ + 3792L2 ^ 
13420L + 5228) 

Average Execution Time (1620 Model 2) 

Fixed length 

Average time — 33.3 ms 
Variable length 

Average time (in /xs) = SL^ + 296L2 -|- 
2950L + 5400 

Floating Arctangent 

Ma€rO'instru£tion 



— 1 

Lin* 


r 

Lab«l 


« IJ 


Oparandi & Rcmorln 
IS 4S » 


0.1. s 










The A and B addresses refer to the units position of the 
exponents of the fields. 

Operation 

The floating point value of the arctangent of B is com- 
puted and the result stored at A. The argument must be 
in floating point form; the result in radians will be in 
floating point form. 

The arctangent subroutine accepts any number with- 
in the floating point range. 

During the evaluation of the arctangent of B, use will 
be made of the divide subroutine. 

The maximum truncation error in the mantissa of the 
result is d=10"^, except for results having an exponent 
less than or equal to 02 (E < 02). The maximum error 
for these results is dtl in the (L + l)th decimal place. 
L = 08 for the fixed length mantissa. 

Average Execution Time (1620 Model 1) 

Fixed length 

Average time = 260 ms 
Variable length 

With automatic divide 
Average time (in jus) = 168U + 2996U -j- 

7792L -h 7260 

Without automatic divide 
Average time (in fis) = 1.9 (168L3 + 2996L2 + 
7792L + 7260) 

Average Execution Time (1620 Model 2) 
Fixed length 
Average time = 31.7 ms 
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Variable length 
Average time (in /xs) = 35U + STOL^ + 
400L + 7500 

Floating Exponential (Natural) 

Macro-instruction 



Ltn« 


Lobcl 
« 11 


Opworion 
II >s 


Oparondi & Rtnorb 

U10 1SM314B4SM 


A. 1.9 






A.iB. 



operation 

The A and B addresses refer to the units position of the 
exponents of the fields. The value of e^, where B is in 
floating point form, is computed and the result, also in 
floating point form, is stored at A. 
An input value that exceeds 

227.955924206n n (227955924206n nOi3) 

causes an exponent overflow and one which is less than 

^227.955924206n n 

(227955924206n n03) 

causes an exponent underflow. An exponent overflow or 
underflow causes the subroutine to examine core stor- 
age position 401 to determine the course of action. 

For negative arguments, the subroutine uses the ab- 
solute value of the argument to evaluate the function, 
and then finds the reciprocal value. 

For positive and negative arguments, the maximum 
truncation error in the mantissa of the result is ±10"^. 

Average Execution Time (1620 Model 1) 

Fixed length 
Average time = 160 ms 

Note: Add 70 to the average time if B is negative. 

Variable length 
With automatic divide 

Average time (in ju,s) = IGSL^ + 35824L2 + 

15890L -h 26418 

Without automatic divide 
Average time (in>s) =: 1.9(168L3 + 

35824L2 + 15890L -h 
26418) 

Note: For a negative argument, add the result of 
520L2 -f 1880L -h 1480 to the average time. 

Average Execution Time (1620 Model 2) 
Fixed length 
Average time =: 38 ms 

Note: Add 11.4 ms if B is negative. 



Variable length 
Average time (in /xs) = 21U + 240L2 + 

6000L - 1300 

Note: Add time for VL Divide if B is negative. 

Floating Exponential (Base TO) 

Macro-instruction 



Line 

i s 


« II 


Op«a»w 

I? M 


Opsnmdi & Rtmoriit 

UMIS301S40 4SN 




• t 1 ■ 1 


FJEXJ 


A. 3 



The A and B addresses refer to the units position of the 
exponents of the fields. 

Operation 

The value of 10^, where B is in floating point form, is 
computed and the result, also in floating point form, 
is stored at A. 

An input value which exceeds 98.9n n 

(989n n02) causes an exponent overflow and 

one which is less than — 98.9n n (989n n02) 

causes an exponent underflow. An exponent overflow 
or underflow causes the subroutine to examine core 
storage position 401 to determine the next course of 
action. 

This subroutine handles negative arguments in the 
manner they are handled by the natural exponential 
subroutine. Maximum accuracy is the same. 

Average Execution Time ( 1620 Model 1) 
Fixed length 
Average time = 145 ms 
Note: Add 70 ms to the average time if B is negative 
Variable length 

With automatic divide 
Average time (in jas) = 168U -\- 3656^ + 

15414L + 24538 

Without automatic divide 

Average time (in /xs) zz 1.9 (IdSU -f- 3656L2 + 
15414LH- 24538) 
Note: For a negative argument, add the result of 
520U + 1889L -f 1480 to the average time. 

Average Execution Time (1620 Model 2) 
Fixed length 
Average time 1= 39.8 ms 
Note: Add 11.4 ms if B is negative. 
Variable length 
Average time (in jas) 23L'^ +240L2 + 
6050L - 1300 
Note: Add time for VL Divide if B is negative. 
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Floating Logarithm (Natural) 

Macro-instrtiction 



iitm 

JU, 1 


« n 


.2 




JL.UL 






A..^ ■ 



The A and B addresses refer to the units position of the 
exponents of the fields. 

Operation 

The floating point value of the In B is computed and 
stored at A. Input arguments must be in floating point 
form. 

This subroutine accepts all arguments greater than 
zero within the floating point range. An input argument 
equal to or less than zero results in a programmed halt. 
A branch back to the main program can be effected as 
described under subroutine error messages. 

Average Execution Time (1620 Model 1) 

Fixed length 

Average time = 290 ms 
Variable length 

With automatic divide 

Average time (in /xs) = 168L^ + 3440L2 + 

10530L + 12180 

Without automatic divide 

Average time (in /xs) = 1.9 (IGSL^ + 3440L2 + 
10530L + 12180) 

Average Execution Time (1620 Model 2) 

Fixed length 

Average time — 51.7 ms 
Variable length 

Average time (in /xs) = 36,5U + 590L2 ^ 
1500L + 8600 

Floating Logarithm (Base 10) 

Macro-instruction 



9 i 


Lab«l 

t II 


Oparotion 

12 IS 


Optrandt & RvdioHa 

i«10 1S»JS«4SM 






FLOG 






The A and B addresses refer to the units position of the 
exponents of the fields . 



Operation 

The floating point value of the logioB is computed and 
stored at A. Input arguments must be in floating point 
form. 

This subroutine accepts all arguments greater than 
zero within the floating point range. An input argument 
equal to or less than zero results in a programmed halt. 
A branch back to the main program can be effected as 
described under subroutine error messages. 

Average Execution Time (1620 Model 1) 
Fixed length 

Average time — 305 ms 
Variable length 

With automatic divide 
Average time (in /is) = 168L^ + 3608L2 + 

11610L + 15108 

Without automatic divide 
Average time (in fis) = 1.9 ( 168L^ + 3608L2 + 
11610L + 15108) 

Average Execution Time (1620 Model 2) 
Fixed length 

Average time = 56.6 ms 
Variable length 

Average time = 33.5U + 6S0U + 
2100L -h 5900 



Subroutine Error Messages 

In 1620 subroutines the presence of special conditions 
causes an error message. This message is typed out in 
the following form: 

xxxxxooxx 

R S 

where R is a return address to the main program 
and S is a code that identifies the special condition. 

With the exception of exponent overflow or under- 
flow, where the course of action depends upon the digit 
at location 00401, a subroutine always halts immedi- 
ately after typing the error message. The error message 
code indicates the reason for the halt. The operator may 
insert a branch instruction at storage location 00000. 
The branch instruction will contain the return address 
to the main program. In cases such as floating square 
root, execution of the subroutine may be made to con- 
tinue, after a halt, by depressing the start key. 

Table 11 lists the error codes for special conditions 
and the appropriate action to be taken. 
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Table 11. Subroutine Error Codes 



ERROR 
CODE 


DESCRIPTION OF ERROR 


OPERATOR'S ACTION WHEN 
SUBROUTINE HALTS 


01 


FA or FS, Exponent Overflow 


May continue execution of subroutine by 
depressing start key 


02 


FA or FS, Exponent Underflow 


Same as code 01 


03 


FM, Exponent Overflow 


Same as code 01 


04 


FM, Exponent Underflow 


Same as code 01 


05 


FD, Exponent Overflow 


Same as code 01 


06 


FD, Exponent Underflow 


Same as code 01 


07 


FD, Attempt to divide using a number with a zero mantissa 
divisor 


May not continue execution of subroutine 
but may branch back to main program using 
return address 


08 


FSQR, Attempt to find the s(|uare root of a negative number 


Pressing the start key causes the subroutine 
to extract the square root of the absolute 
value of the argument 


09 


FSIN or FCOS, Input areument has an exponent value creater 
than 08 (fixed length mantissa) or L (variable-length mantissa) 


Same as code 07 


10 


FSIN or FCOS, For a fixed-length mantissa, the input argument 
has an exponent (X) such that 03 < X < 08, For a variable- 
length mantissa, the input argument has an exponent (X) such 

thdt* 03 X ^ whpr#» I J = Ifnorfh nf a mjinH<:(kfi 


Same as code 01 


11 


FEX or FEXT, Exponent Overflow 


Same as code 01 


12 


FEX or FEXT, Exponent Underflow 


Same as code 01 


13 


FLN or FLOG, Input argument has a zero mantissa 


Same as code 07 


14 


FLN or FLOG, Input argument is negative 


Pressing the start key causes the subroutine 
to continue execution, using the absolute 
value of the argument 



Adding Subroutines 

Up to 12 subroutines may be added to any of the card 

or paper tape subroutine packages. 

In brief, the steps required to add a subroutine are: 

1. Write the subroutine and assemble it in condensed 
form. 

2. Add the new subroutine to the card or tape pack- 
age. 

3. Add the macro-instruction mnemonic to the sps 
processor. 

The specific details of adding a subroutine or its macro- 
instruction are covered in adding a subroutine to a 

CARD DECK Or ADDING A SUBROUTINE TO TAPE. 



Adding a Subroutine to a Card Decfc 

After a subroutine is written, it must be assembled in 
condensed form. Then, discard the first two loader 
cards and the last seven table cards of the object deck. 



( Discard the last seven cards if assembly was made for 
a Model 1; discard the last 6 cards if assembly was 
made for a Model 2.) These cards are replaced by a 
subroutine header card and a subroutine trailer card. 
The formats for the subroutine header and trailer cards 
are described below. The new subroutine, together 
with its header and trailer cards, is inserted into the 
subroutine deck between the trailer card of the last sub- 
routine presently in the deck and the "end of deck" 
card ( identified by a record mark ( 4= ) in column 76 ) . 

Header Card Format 

Columns 1-4 Length of subroutine — 4 digits in 
the form xxxx. 
5-13 Subroutine numbers (each in two 
digits XX ) followed by a record 
mark; a subroutine may have up 
to four entry points, with each entry 
represented by a unique mne- 
monic. 
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14-23 Number of storage positions ( three 
digits XXX ), between the second 
(third and fourth) entrance(s) 
and the regular entrance of the 
subroutine. These 3-digit fields 
must be terminated by a record 
mark (for example, l20l864r). If 
the subroutine has only one en- 
trance, a record mark should be 
punched in column 14. 

24 0 ( zero ) for subroutine deck with- 
out automatic divide; 1 for subrou- 
tine deck with automatic divide; 
=1= for variable length subroutine 
decks with divide or with auto- 
matic floating point; 0 for variable 
length subroutines without auto- 
matic divide. 

25-43 The secondary linkage in machine 
language. The linkage contains two 
instructions, the second of which 
is always a branch ( operation code 
49 ) . The operation code in the first 
instruction and the three addresses 
can be specified by the program- 
mer. The breakdown of these col- 
umns is as follows: 

25-26 Two-digit numerical opera- 
tion code for the first in- 
struction. Modification to 
the P and Q addresses is in- 
dicated by a flag or no flag 
on the first and second 
digit, respectively. A flag 
implies that the address is 
relative to the subroutine 
itself while no flag means it 
is relative to the Pick sub- 
routine. 

27-31 P address of the first in- 
struction, expressed as an 
increment to pick or the 
subroutine. For example, 
PICK + 23 will be 00023 
and subrI + 59 will be 
00059. 

32-36 Q address of the first in- 
struction, expressed as an 
increment to pick or the 
subroutine. For example, 



44-75 
76 

77-80 



PICK + 23 will be 00023 
and SUBR 1 -}- 59 will be 
00059. 

37-38 Operation code 49; a flag or 
no flag on digit 4 indicates 
modification to the P ad- 
dress with respect to the 
subroutine or pick. 

39-43 P address expressed as an 
increment to pick or the 
subroutine. 

Blanks. 
0 (zero). 

Sequence number. 



Trailer Card Format 

Column 76 1 

77-78 Subroutine number. 
79-80 Sequence number. 

Sample Problem Illustrating Header Card, 
Subroutine, and Trailer Card 

In this example the subroutine is to be inserted in the 
variable length subroutine deck without automatic 
divide. The Floating Branch and Transmit subroutine 
( BTFS ) is used as the new subroutine; thus it is assumed 
that the subroutine deck contains no btfs subroutine. 
This example shows the header card coding, the mod- 
ifier constants, the O,, and d flag indicators associated 
with the new subroutine, and the trailer card coding. 
For each field of the header and trailer cards, the data 
contained in the field as well as a description of the 
data is given. 



HEADER CARD 

Columns 1-4 : 0079 



5-13: 17=t= 
14-23: 4= 



24: 0 



25-43: 16 00402 



Program requires 79 
storage positions. 
Subroutine identify- 
ing number. 
Subroutine has only 
one entry point. 
Variable length sub- 
routine without auto- 
matic divide. 
00000 49 00104 
These instructions cor- 
respond to the secon- 
dary linkage: 

TFM PICK -H 402, 
ADDR 

B PICK + 104 
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44-75: Blanks 

76: 0 
77-80: 4000 



The P operands of the 
TFM and B will be 
modified by adding 
the address of pick 
when it is found. The 
Q operand of the tfm 
will be modified by 
adding the starting 
address of the btfs 
subroutine to it. 



The 4 is the identify- 
ing number of the 
subroutine set. The 
000 is the card se- 
quence number. 



SUBROUTINE 



DORG 5000 

Standard dorg statement for all subroutines. 

DC 14, 05000005050500, 314 

This statement provides the modifier digits for 
the seven instructions which follow. 

BTFSl TF * + 66, STORE + 6, 0 

A flag over Oo indicates to the subroutine pro- 
cessor that the P operand must be modified with 
respect to the relocated addresses of the btfs 
subroutine. With respect to pick, the Q operand 
is modified by the second digit of the pseudo 
constant. 

TF * + 30,* +54, 01 

The P and Q operands need only be modified 
with respect to the btfs subroutine. Therefore, 
the only modification required is flagging Oo and 

Ou 

SM * + 18, 3, 010 

* + 18 is modified with respect to its own sub- 
routine. The Q operand needs no modification 
since 03 is wanted. The flag on Qw is needed in 
the computation. 

TF , BETA - 2 

With respect to pick, the Q operand is modified 
by the eighth digit of the pseudo constant. 

TF * + 30, STORE +30, 0 

Oo flagged to modify * + 30 with respect to 
BTFS subroutine. Q operand was previously 
modified. With respect to pick, the Q operand 
is modified by the tenth digit of the pseudo 
constant. 

BT , BETA 

With respect to pick, the Q operand is modified 
by the twelfth digit of the pseudo constant. 



No modification. 

DEND 

No modification. 



TRAILER CARD 

Column 76 



Library Change Card 

For each macro-instruction added, a library change 
card must be prepared for insertion in the processor 
deck. These cards must be inserted immediately in 
front of the last nine cards of the processor deck. 

The programmer must assign a unique mnemonic 
operation code to each macro-instruction. New macro- 
instruction mnemonics must be four alphameric char- 
acters in length. 

The format of the library change card is as follows: 

Columns 1-8 Mnemonic operation code in 2- 
digit form (column 1 must be 
flagged, columns 2 to 8 must not 
be flagged), 
subroutine number. 
7. 

record mark (0, 2, 8 punches), 
blanks. 

01 (column 63 must be flagged), 
address of leftmost location where 
data from columns 1-11 is to be 
stored. Column 65 must be flagged, 
address plus 1 of rightmost loca- 
tion where data from columns 1-11 
is to be stored. Column 70 must be 
flagged, 
blank. 

—(flag only). 

The address in columns 65-69 for subroutine 18 can be 
found by referring to the program listing (symbol 
XDEND-l-12). This number must be increased by 11 for 
each subsequent subroutine. The address in columns 
70-74 is 11 greater than the address placed in columns 
65-69 for subroutine 18. This address must also be in- 
creased by 11 for each subsequent subroutine being 
added. 



9-10 
11 

12 

13-62 
63-64 
65-69 



70-74 



75 
76 



Adding a Subroutine to Tape 

A tape modifier program is included in the sps ni Pro- 
gramming System. Its purpose is to allow the addition 
and/or deletion of subroutines and subroutine macro- 
instructions to or from the subroutine tape. 
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Procedure 

A brief summary of the procedures to be followed 
when using the tape modifier program is: 

1. Write the subroutine in sps language with origin 
at 05000 (dorg 5000). 

2. Assemble the subroutine. 

3. Prepare the subroutine header data so that it may 
be entered at the keyboard when called for by the 
tape modifier program. 

4. Load the tape modifier program. 

5. Produce a new sps hi processor as directed by the 
typed messages. 

6. Produce a new subroutine tape as directed by the 
typed messages. 

Program Switches 

The following switch information is typed out after the 
tape modifier program has been loaded. 

SSWl - ON TO ADD SUBROUTINES 
SSW2 - ON TO DELETE SUBROUTINES 
SSW3-ON TO BYPASS SPS III PROCESSOR 

MODIFICATION 
SSW4 - ON TO CORRECT ENTRY ERROR SET 

SWITCHES THEN DEPRESS START 

Program Switches 1, 2, or 3, or all three can be turned 
on at this time. 

Adding and Deleting Subroutine 
Macro-Instruction Mnemonics 

After the switches are set and the Start key is depressed, 
either of the following messages or both are typed, de- 
pending on the switch settings; 

ENTER NEW MACROS, ONE AT A TIME 
FOLLOW LAST ENTRY WITH A RECORD MARK 

ENTER MACROS TO BE DELETED, ONE AT A TIME 
FOLLOW LAST ENTRY WITH A RECORD MARK 

Note: New macro-instruction mnemonics must be 
four alphameric characters in length followed by the 
new subroutine number. Deleted mnemonics are en- 
tered as they actually appear in the present op-code 
table, e.g., fa for Floating Add, etc. Deleted mne- 
monics must also be followed by the subroutine num- 
ber they represent. After each entry of an added or 
deleted mnemonic, a Release and Start must be exe- 
cuted prior to entering the next mnemonic. The last 
entry must be followed by a record mark, e.g., FA034:. 

If Switches 1 and 2 are on, the second typeout occurs 
after all new macro-instruction mnemonics are entered. 

If Switch 3 is on, the processor modification is by- 
passed and the program calls for the subroutine proces- 
sor tape as described below. However, if Switch 3 is oflF 



after entering the new or deleted macro-instruction 
mnemonics, the message 

LOAD SPS III TAPE AND DEPRESS START 

is typed. This loading results in the creation of a new 
SPS III tape which reflects the addition and /or deletion 
of the mnemonics that were typed in. 

If the op-code table cannot accommodate all the new 
mnemonics (a maximum of 12 have already been en- 
tered ) , the following message is typed, followed by a 
list of all mnemonics that could not be entered: 

OP-CODE TABLE FULL 

THE FOLLOWING MACROS HAVE NOT BEEN ENTERED 

If the op-code table can handle all new mnemonics, 
the program calls for the subroutine processor tape by 
the following typeout: 

LOAD SUBROUTINE TAPE AND DEPRESS START 

Adding and Deleting Subroutines 

When the subroutine tape is loaded, a new tape is 
punched. If a subroutine(s) is being added, punching 
stops when the beginning of the "end of tape" record 
is reached. The program then calls for the header data 
pertaining to the new user- written subroutine(s). If 
no subroutines are being added, the modification is 
complete when punching stops. The header informa- 
tion is entered when the following message is typed. 

ENTER HEADER INFORMATION FOR NEW 
MACRO XXXX 

where XXXX is the name of the new macro. The header 
data called for consists of the following: 

LENGTH = Four digits in the form XXXX. 

SUBROUTINE number(s) = Two digits in the form 
XX4=. If more than one number applies, the form 
XXXX4= is used. Up to four numbers (two digits 
each) can be used. 

ENTRY point DIFFERENCES = Three-digit field for 
each additional entry point. If there is only one 
entry point, only a record mark is entered. For 
each additional entry point, the number entered is 
the difference between the first entry and the sec- 
ond or third, etc.; the form is XXXXXX^r. 

SECONDARY LINKAGE FORMAT — Secondary linkage in 
machine language. 

Note: If a subroutine is written that has multiple mne- 
monics and numbers, such as fsin and fcos, the header 
data should be entered when any one of the relevant 
mnemonics appears in a call for header data. 
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After each bit of data is entered, a Release and Start 
allows entry of more data until all necessary informa- 
tion is entered. The program then calls for the object 
tape associated with the header data just entered. The 
typeout is 



LOAD OBJECT TAPE FOR MACRO XXXX 
AND DEPRESS START 



Here, XXXX is the mnemonic of the new subroutine 
being added. Run out the subroutine tape from the 
reader using the Nonprocess Runout key. Then load 
the object tape and depress the Start key. 

After the new subroutine has been punched into the 
subroutine tape along with the appropriate header and 
trailer data, the program calls for more header data if 
more subroutines are to be added. If no more are to be 
added, an "end of subroutines" record is punched, the 
message 

RELOAD LIBRARY SUBROUTINE TAPE 

is typed, and the machine halts. Reload the subroutine 
tape (from the beginning) and depress the Start key. 

After the remainder of the library subroutine tape is 
processed, the message 

MODIFICATION COMPLETE 

is typed, and the machine halts. 

At any time during the operation, operator entry 
errors can be corrected by turning on Program switch 
4, depressing the R-S key, turning oflE Switch 4, and re- 
entering the data. 



Writing a Subroutine 

When writing a subroutine, the programmer should be 
aware of certain information concerning pick, namely, 
the functions of pick, pick address equivalents, linkage, 
common work areas in pick, and the means of signify- 
ing instructions that are relative to pick. 

Functions of PICK 

PICK is common to all subroutines in the subroutine 
package, except mv, fsrs and fsls. Therefore, it is to the 
advantage of the subroutine writer to make use of pick. 
The listing of the appropriate Pick subroutine (fur- 
nished with the library package) should be studied. 
Briefly, pick performs the following operations. It: 

1. Moves the A operand into alpha (exponent and 
mantissa). 



2. Moves the B operand into beta (exponent and 
mantissa). 

3. Calculates the return address to the mainline pro- 
gram, 

4. Resets location 00401 ( subroutine error digit ) . 

5. Stores the computed result (which is in alpha) 
back into the address of the A operand. 

6. Contains constants and storage areas that are 
common to other subroutines in the package. 

Subroutines Linkages 

The following linkage is generated in the mainline pro- 
gram for all subroutine macro-instructions. 



TFM 
B 

DORG 
DSA 



PICK H- 11, * + 23 

SUBR 

*-4 

A,B 



The branch is to the secondary linkage for the specific 
subroutine used. The secondary linkage is generated by 
the subroutine processor at the time the subroutines are 
being relocated and punched into the object deck. For 
example, the secondary linkage for a variable length 
subroutine is: 

1. SUBR TFM PICK + 402, ADDR ) ^ , 

B PICK f ^P^^^"^^ 

2. SUBR TFM PICK -h 402, ADDR ) , 
B PICK + 104 J'^"^ ^P"^^"^ 



ADDR is the address of the first instruction of the sub- 
routine in question. 

This linkage moves the starting address of the sub- 
routine into pick to allow a later branch to the subrou- 
tine ( B ADDR ) . Next, the secondary linkage branches to 
pick, pick moves the data contained in the A operand 
into ALPHA and the data in the B operand into beta. It 
also computes the return address to the mainline pro- 
gram and branches to the subroutine. After the subrou- 
tine is executed, the program branches back to the Pick 
subroutine. 

Figure 3 shows the sequence of events that occur 
when the macro-instruction equivalence is encountered 
during execution of the object program. 

Note: When the A operand in the diagram is used in 
the computation, the secondary linkage branches to 
PICK; when the A operand is not used in the computa- 
tion (as in the functional subroutines), the secondary 
linkage branches to pick + 104 (variable length) and 
the B operand alone is placed in beta. 
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Note that if the macro-instruction contains more 
than two operands, arrangements must be made in the 
programmer's subroutine to store the B, or B and C 
operands in some location other than beta. This is to 
prevent the B, or B and C operands from being de- 
stroyed, for PICK automatically stores any operand, after 
the first operand, in beta. 

The return address to the mainline program, calcu- 
lated by the Pick subroutine is correct only if all oper- 
ands associated with the subroutine have been pro- 
cessed. 

The computed result is always assumed to be stored 
in ALPHA. In addition, the result at alpha is stored by 
the Pick subroutine at the address specified by the A 
operand, prior to the return to the mainline program. 

There are various working areas for constants in the 
Pick subroutine that may be used ( shared ) by the add- 
ed subroutines. The programmer may refer to the sub- 
routine program listing (provided with the library 
package ) to make effective use of the Pick subroutine. 

Bypassing PICK 

The subroutine writer may, if he desires, bypass pick 
completely by setting up the secondary linkage in 
columns 25-43 of the subroutine header card (see 

HEADER CARD FORMAT ). 

Since the first linkage puts the address of the A oper- 
and in PICK + 11, the secondary linkage can move it 
from there to any place in the subroutine itself (and 
branch to the subroutine ) . This is what is done in the 
Div, FSLs, and fsrs subroutines, where the secondary 
linkage is of the form 

TF ADDR + 11, PICK + 11,0 
B ADDR, ,0 

When the programmer bypasses pick, he is respon- 



sible for performing all necessary operations normally 
performed by pick. 

PICK Address Equivalents 

Listed in Table 12 are certain pick address equivalents 
for fixed length and variable length subroutine decks, 
as well as for the subroutine deck which uses automatic 
floating point. 

Instructions Relative to PICK 

When writing a subroutine, the programmer must set a 
flag over position O,, and/or Oj of instructions where 
the P and/or Q operands are relative to the origin (lo- 
cation 05000), e.g., an instruction located at 05300, 
such as 

TF * + 23, * - 1 

in machine language should be 260532305299. There- 
fore it should be written as 

TF * +23,* -1,01 

If the P operand alone is relative, then only Oy should 
be flagged, as 

AM * + 18,5,07 

The Q; digit is flagged because the instruction is of the 
"immediate" type. 

Operand Modification 

Whenever pick is used, the programmer must use in- 
structions in his subroutine which make reference to 
the Pick subroutine. The subroutine relocator program 
must adjust the operands of these instructions to make 



Table 12. Pick Address Equivalents 



ADDRESS EQUIVALENTS 




FIXED 
LENGTH 


VARIABLE 
LENGTH 


AUTOMATIC 

FLOATING 

POINT 


DESCRIPTION 


PICK 


PICK 


PICK 


Entry for subroutines that use A operand data in the computation. 


PICK + 104 


PICK + 104 


PICK + 24 


Entry for subroutines that do not use A operand data in the computation. 


PICK + 140 


PICK + 140 


PICK + 60 


Re-entry to pick up additional operand (other than the A and B operand. 


PICK +414 


PICK + 402 


PICK + 174 


Address of subroutine (P address of instruction that branches to the subroutine). 


PICK +416 


PICK +404 


PICK + 176 


Re-entry from subroutines to store result of computation. 


PICK +482 


PICK +434 


PICK + 194 


Return address of mainline program (P address of instruction thot branches to 
mainline program). 


PICK +711 


PICK + 657 


PICK +417 


Alpha (A operand data itself). 


PICK + 743 


PICK + 802 


PICK + 562 


Beta (B operand data itself) . 
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Figure 3. Basic Flow Chart of User s Subroutine 



- PICK Relationship 



AAainline Program |^ 



Mainline 
Program 

InsfrucHons 



Macro, e.g. 
FS A,B 
FSIN A,B 



1. Move Address 
of A operand 
to PICK + 11. 

, Branch to 
secondary 
linkage. 



Instructions 
(contd) 



; Place result s 
in ALPHA 



(Branch to • 
. PICK , 
5 store routines 



Mov e result f roml 
ALPHA into Aj 
^operand of^^ 
mainline programj 



I 



1. Move address of 
A operand (in PICK 
+ 11) to SUBR +11. 

2. Branch to SUBR. 



?: Compute returns 

address to 
mainline program 



Branch to;^^ 
: mainline program; 



Pick Subroutine 
User's Subroutine 



Secondary 
Linkage 




Move Address 

of Subroutine 
into PICK 



Branch to PICK, 
load one 
argument 




Branch to PICK, 
load two 
arguments 



^ Place A operand^ 
^ in ALPHA Vm 

^ Place B operand I 

^in BETA r 
iumt/i 



i 



WMmmmg 





Reset erroi^^ 
^indicator^^ 
Pocation 00401) | 



^to "no error'^/y 
;Condition" i.eu* -m 
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them correspond to the actual addresses of pick in the 
object program. This is done by using a pseudo con- 
stant (dc statement). The constant does not become a 
part of the object program; its only function is to indi- 
cate to the subroutine relocator program that the in- 
structions that follow are to be modified. 

One DC statement can modify up to 25 instructions. 
Each instruction, whether or not it is to be modified, 
requires two digits in the pseudo constant, one for the 
P operand and one for the Q operand. The statement 
itself consists of three operands: the first specifies the 
length of the constant which may not be greater than 50 
nor less than 2; the second, the actual constant; the 
third, the storage address of the constant. This address 
must be specified as an absolute value in the following 
form: 00320 for a 20-digit constant, 00342 for a 42-digit 
constant, etc. The P and Q operand modifier constants 
follow. 



P and Q Operand 
Modifiers 

0 
1 
2 
3 
4 
5 



Modification 

No Modification 
AddL 
Subtract L 
Add 2L 
Subtract 2L 

Modify with respect to pick, 
no L modification 
Modify with respect to pick, 
addL 



7 
8 
9 



Modify with respect to pick, 
subtract L 

Modify with respect to pick, 
add 2L 

Modify with respect to pick, 
subtract 2L 



The following example shows how a variable length 
mantissa subroutine may be modified, by use of modi- 
fier constants, to use three operands in its computation. 
Secondary linkage 1 (two operands) is used in this 
example. 

The A operand data is stored in alpha ( pick + 657 ) 
and the B operand data is in beta ( pick -h 802 ) . There- 
fore: 



SUBR 



DC 6, 275050, 306 

TR GAMMA — 1, 801, 0 Transmit beta into 

gamma 



TFM 402, * + 20, 17 



B 



140 



Set up return ad- 
dress to added sub- 
routine 

Go to Pick subrou- 
tine to obtain next 
operand 



DORG * - 4 



Note: Intervening dorg statements and constants be- 
tween instructions are never modified in this manner. 

Data from the last operand processed will be in beta 
(pick -I- 802). The maximum number of operands al- 
lowed in secondary linkage 1 is two; however, the A 
and B operands may be the same. 
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1620 SPS III Processor Program 



The SPS m processor, which is available in card or paper 
tape form, is a two-pass program. The users source 
program, written in symbolic language, is the input for 
both passes. The functions of Pass 1 and Pass 2 are 
listed below: 



Symbol Table 

A variable length label entry is used to store as many 
labels as possible in the area reserved for the symbol 
table. Eadi label when stored takes the following form; 



Pass 1 

1. Checks for valid mnemonic operation codes. In- 
valid operations are considered nop and are proc- 
essed as such if Program Switch 2 is oflF. 

2. Processes symbolic labels and prepares a table of 
the symbolic labels and their assigned addresses 
for use in the second pass. 

3. Assigns storage positions to instructions, work 
areas, and constants. 

4. Performs checking necessary to produce error 
messages. 

Pass 2 

1. Processes operation codes. Converts mnemonic 
program operation codes to their corresponding 
1620 machine language codes. 

2. Processes operands according to the type of oper- 
ation code. Looks up assigned addresses and sym- 
bolic operands in the symbolic table prepared dur- 
ing Pass 1. Performs address adjustment, if neces- 
sary, to complete the operands. Sets flags in the 
assembled instruction, as specified by the flag in- 
dicator operand. 

3. Types error messages for those statements that 
cannot be assembled properly. 

4. Prepares the assembled output and lists the sym- 
bol table, if desired. 



Storage Layout 

The storage layout of the sps processor is shown in 
Figure 4. The operation code table contains all valid 
mnemonic operation codes and their equivalent ma- 
chine language codes. Any alterations to the processor 
will change the addresses shown in this figure. 





Head 




Char- 




acter 




H 


N 


-| 



Variable Length Label- 



Associated 
Address 

a| a| a|a| A 



where N = number of characters in label plus head 
character (2-6) 

H = head character (two-position alphameric 
coding ) 

L . . . . Ln = five characters of label ( two-po- 
sition alphameric coding ) 

AAAAA = assigned address (five numerical 
positions ) 

Note: The rightmost position of L„ contains a flag for 
any true 6-character label. 

A label entry will always contain N, H, and A data 
and at least one L character. Therefore, the minimum 
size label (one character) requires 10 storage positions. 
Each additional L character will use two additional 
storage positions up to eight positions. The maximum 
size label (5 or 6 characters ) requires 18 storage posi- 
tions. 

A six-character label is stored without a head char- 
acter and the leftmost character of that label occupies 
the head character (H) storage position. For the six- 
character label, a flag is placed in the rightmost position 
of Ln so that the processor may distinguish between a 
5-character label with a head character and a true 6- 
character label without the head character. When a 
label which is not preceded by a head statement is 
placed in storage, the head character (H) is assigned 
as blank by the processor. 
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1626 SPS III 




Card 


Tape 




00000 


00000 










Arifhmetic Tables 


00401 


00401 




00402 


00402 








Input/Output Areas, 






Work Storage, 






Constants 


01943 


01811 




01944 


01812 








Processor 






Program 


16115 


15193 




16116 


15194 


Input/Output Areas, Work Storage, 




16384 


15380 


Constants 


16385 


15381 








Operation Code Table 






(Mnemonics) 


17999 


16995 




18000 


16996 








Symbol Table 


19980 


19911 





1620 


- 1443 


SPS 


III 


Card 


Tape 


00000 


00000 


00401 


00401 


00402 


00402 


01937 


01807 


01938 


01808 


16161 


15817 


16162 


15818 


16394 


15988 


16395 


15989 


18196 


17790 


18197 


17791 


19980 


19911 



Figure 4 Storage iAyout 
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CAPACITY 



The maximum number of symbols or labels cannot be 
specified due to their variable length. However, the fol- 
lowing formula may be applied to find the allowable 
number of symbols (within dr 1) for any given source 
program. 



K = 



e = 5 



Le (8 + 2e) 



e = 1 



e zz number of characters in label 
Le = numberof labels of length V 
L<; zn number of six-character labels 
K = the storage capacity of the symbol table. K can 
have a maximum value of: 



Card 

Paper Tape 



1620 sps III 

1980 
2715 



1620-1443 SPS III 

1783 
2120 



for 1620 Systems with 20,000 positions of core storage. 
K should be increased by 20,000 or 40,000 when the 
assembling system is equipped with 40,000 or 60,000 
positions of storage, respectively. 



Paper Tape Processor Program 

The paper tape processor program accepts input for the 
first pass in either paper tape form or directly from the 
typewriter, depending upon the setting of the program 
switch. If the typewriter is used to enter the source 
statements, the processor produces a source program 
tape to be used as input for the second pass. 

When subroutines are used in the source program, 
the subroutine program paper tape must follow the 
source program as input for the second pass. 

Output from the second pass may include an object 
program tape and/or a typewriter listing. Error mes- 
sages indicating errors in the source program are typed 
out during Pass 1 or Pass 2. The programmer has the 
option of correcting these errors either as indicated or 
after assembly is finished. 

Make-up of Output Tape 

The output tape produced by Pass 2 contains the as- 
sembled machine language instructions, constants, and 
other data that are part of the object program. Loading 
instructions appear at the beginning of the object tape 
followed by the object program, selected subroutines, 
and multiplication and addition tables (condensed 



form ) in that order. A complete self-contained program 
tape is produced, ready to be entered in the 1620. 



Cord Processor 

Input may be from cards or the typewriter. If the type- 
writer is used, a source program card deck is punched 
as output for Pass 1. This card deck becomes the input 
for Pass 2. Error messages are typed out for both passes. 
Affected statements may be corrected when the mes- 
sage is noted or at the completion of Pass 2 after all 
messages have been recorded. 

The input for Pass 2 is the source program deck fol- 
lowed by the subroutines, provided they are used. The 
typewriter output from this pass may consist of the 
object program with error messages, or error messages 
only, as determined by the program switch setting. 

An object program card deck is produced in con- 
densed form or uncondensed form, depending upon 
the setting of the program switches. The condensed 
card contains up to five machine language instructions, 
thus requiring fewer cards than the uncondensed ver- 
sion, which has multiple cards for each statement. Im- 
mediately after an uncondensed object deck is obtained 
from Pass 2, the programmer can get a condensed deck 
by processing the source cards a third time as described 
under operating procedures. 

Both the condensed and uncondensed card decks 
are complete with loader and arithmetic tables. The un- 
condensed deck contains both symbolic and absolute 
information, but only absolute data is loaded. 

Make-up of Output Deck 

The object program is preceded by two loader cards 
and followed by seven cards that perform the following: 

1. Interrupt the loading sequence of the object pro- 
gram. 

2. Load the arithmetic tables. 

3. Branch to the start of the object program or branch 
to a halt. 

Uncondensed Object Deck Format 

The individual card format of each type of statement is 
given. The number of cards per statement may range 
from one to several, depending on the type of operation 
(imperative, declarative, control, macro-instruction, 
comments) or type of individual statement. For the 
SEND or HEAD Statements, no output cards are produced. 

Imperative Operation Cards 

Card 1. Same as source statement card with the ex- 
ception of a 0 in column 76 and card number 
in columns 77-80. 



54 



Card 2. Columns 1-5 page and line number. 

6-10 high-order leftmost address 
where assembled instruction 
is to be stored. 
11-22 assembled instruction. 

23 4= 
63-64 II. 

65-69 leftmost address where as- 
sembled instruction is to be 
stored. 

70-74 rightniost address plus one, 
where assembled instruction 
to be stored. 
76 9. 

77-80 card number. 

Control Operation Cards 

DORG, DEND 

Card 1. Same as source statement card with the ex- 
ception of a 0 in column 76 and card number 
in columns 77-80. 
Card 2. Columns 1-5 page and line number. 

6-10 address specified. 
76 9. 
77-80 card number. 

TRA 

Card 1. Same as source statement card with the ex- 
ception of a 0 in column 76 and card number 
in columns 77-80. 
Card 2, Columns 1-5 page and line number. 

6-10 leftmost address where in- 
struction is to be stored. 
11-22 assembled instruction (first 
instruction). 
23 ^ 
63-64 11. 

65-69 leftmost address where in- 
struction is to be stored. 
70-74 rightmost address plus one, 
where instruction is to be 
stored. 
76 9. 
77-80 card number. 
Card 3. Same as card 2 (11-22 is second instruction). 

TCD 

Card 1. Same as source statement card with the ex- 
ception of a 0 in column 76 and card number 
in columns 77-80. 
Card 2. Columns 1-5 page and line number. 

6-10 address specified. 
76 9, 
77-80 card number. 



Cards 3-9, Arithmetic tables. 
Cards 10-11. Loader program. 

Declarative Operation Cards 

DS, DSS 

Card 1. Same as source statement card with the ex- 
ception of a 0 in column 76 and card number 
in columns 77-80. 
Card 2. Columns 1-5 page and line number. 

6-10 rightmost address of field. 
13-17 field length. 

76 9. 
77-80 card number. 
Note: For the dss operation, columns 6-10 of card 2 
contain the leftmost address of the field. 

DAS 

Card 1. Same as source statement card with the ex- 
ception of a 0 in column 76 and card number 
in columns 77-80. 
Card 2. Columns 1-5 page and line number. 

6-10 leftmost address plus one, of 
field. 

13-17 field length (number of al- 
phameric characters ) . 
76 9. 
77-80 card number. 

DSB 

Card 1. Same as source statement card with the ex- 
ception of a 0 in column 76 and card number 
in columns 77-80. 
Card 2. Columns 1-5 page and line number, 

6-10 rightmost address of first ele- 
ment of array. 
13-17 element length. 

76 9. 
77-80 card number. 



DSA 

Card 1. Same as source statement card with the ex- 
ception of a 0 in column 76 and card number 
in columns 77-80. 

Card 2. Note: A card of this type is punched for each 
operand. 

Columns 1-5 page and line number. 

6-10 rightmost address where field 

is to be stored. 
13-17 field length (constant 00005). 
18-22 the 5-digit field (address 
itself) being stored. 
23 4= 
63-64 18. 
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65-69 leftmost address where field 

is to be stored. 
70-74 rightmost address plus one, 
where field is to be stored. 
76 9. 
77-80 card number. 

DC, DSC 

Card 1. Same as source statement card with the ex- 
ception of a 0 in column 76 and card number 
in columns 77-80. 
Card 2. Columns 1-5 page and line number. 

6-10 rightmost address where 

constant is to be stored. 
13-17 field length of the constant. 

76 9. 
77-80 card number. 
Card 3. Columns 1-5 page and line number. 

6-n the coilstant itself starts in 
column 6 and is terminated 
by a record mark ( 4= ) in the 
first column following the 
constant. 
63-64 06. 

65-69 leftmost address where con- 
stant is to be stored. 

70-74 rightmost address plus one, 
where constant is to be 
stored. 
76 0. 

77-80 card number. 

Note: For the dsc statement, columns 6-10 of card 2 
contain the leftmost address where the constant is to be 
stored. 

DNB 

Card 1. Same as source statement card with the ex- 
ception of a 0 in column 76 and card number 
in columns 77-80. 

Card 2. Columns 1-5 page and line number. 

6- 10 rightmost address where con- 

stant (blank) is to be stored. 
13-17 field length. 

76 9. 
77-80 card number. 
Card 3. Columns 1-5 page and line number. 

7- n the numerical blanks (coded 

4, 8) start in column 7 and 
are terminated by a record 
mark (4^) in the first col- 
umn following the constant. 
63-64 07. 

65-69 leftmost address where con- 
stant (blanks) is to be stored. 



70-74 



76 
77-80 



rightmost address plus one, 
where constant is to be 
stored. 
0 

card number. 



DAC 

Card 1. Same as source statement card with the ex- 
ception of a 0 in column 76 and card number 
in columns 77-80. 
Card 2. Columns 1-5 page and line number. 

6-10 leftmost address plus one, 
where constant is to be 
stored. 

13-17 field length (number of al- 
phameric characters ) . 
76 9. 
77-80 card number. 
Card 3. Note: A constant that contains over 25 char- 
acters causes two cards to be punched 
in this format. Up to 25 characters 
may be punched on each card. 
Columns 1-5 page and line number. 

6-n the constant itself starts in 
column 6 and is terminated 
by a record mark ( =f= ) in the 
first column following the 
constant. 
63-64 06. 

65-69 leftmost address where con- 
stant is to be stored. 

70-74 rightmost address plus one 
where constant is to be 
stored. 
76 0. 

77-80 card number. 

Macro-instruction Cards 

Card 1. Same as source statement card with the ex- 
ception of a 0 in column 76 and card number 
in columns 77-80. 
Card 2. Columns 1-5 page and line number. 

6-10 leftmost address where first 
linkage instruction is to be 
stored, 

11-22 assembled instruction. 

23 4= 
63-64 11. 

65-69 leftmost address where in- 
struction is to be stored. 

70-74 rightmost address plus one, 
where instruction is to be 
stored. 
76 9. 

77-80 card number. 



56 



Card 3. Same as card 2 (second linkage instruction). 
Card 4. Note: A card of this type is punched for each 
operand. 

Columns 1-5 page and line number. 

6-10 leftmost address where field 

is to be stored. 
13-17 field length (constant 00005) . 
18-22 the address itself ( 5-position 
field) to be stored. 
23 j= 
63-64 18. 

65-69 leftmost address where field 
is to be stored. 

70-74 rightmost address plus one, 
where field is to be stored. 
76 9. 

77-80 card number. 



Comments Cards 

Card 1. Same as source statement with the exception 
of a 0 in column 76 and card number in col- 
umns 77-80. 

Card 2. A digit 9 in column 76 and card number in col- 
umns 77-80. 

Listing the Uncondensed Object Deck 

Figures 5 and 6 show control panel wiring diagrams 
designed for listing an uncondensed object program 
on the IBM 407 and on the ibm 407-E8. 



Condensed Object Decic Format 

Condensed cards are punched as described under the 
particular card type. 




I_H III 1 M 1 
I I HIlllIlHIIlllll 



1 1 hlTTIl 1 1 H 1 I 111 ! 1 



IHIlIHIl 



1 ! H I 



1 I Hill! I 11-11 I III II'' Co-lactor. 19 ond 20 or. u.«i to I M ] 



•quippod with theto co-«el«e|pri, 
two other co-Mlector» may be used. 



-TTT 



I I I I I I Alteration Switches 

swi 

" t'.'.X " t " ~ Pi'int sequence number on 

right-hond side of listing. 
ON- Print sequence number in 
place of poge ond line 
numbers, but not on right 
hond side of listings. 

SW3 

OFF - Single ipooe 
ON - Double space 



Ai 1 1 /1 1 i 1 III I m fiml \\u H n m 1 1 n }! 



nntunninnnti/iinn nntiHHUn 



Figure 5. 407 Control Panel Wiring Diagram for Listing Uncondensed Output 
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Cards Containing Instructions 

Columns 1-12 
13-24 
25-36 
37-48 
49-60 
61 
62 
63-64 
65-69 



70-74 



76 
77-80 



five instructions. 
4= (record mark). 
0. 
01. 

leftmost address where in- 
structions are to be loaded, 
rightmost address plus one, 
where instructions are to be 
loaded, 
(flag only), 
card number. 



Cards Containing Constants 

Columns 1-61 constants may be from 1 to 
60 characters followed im- 
mediately by a record mark 

( + ). 
62 1. 
63-64 01. 

65-69 leftmost address where con- 
stants are to be loaded. 

70-74 rightmost address plus one, 
where constants are to be 
loaded. 
76 (flag only). 

77-80 card number. 




Figure 6. 407-E8 Control Panel Wiring Diagram for Listing Uncondensed Output 
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Condensed Ob/ecf Deck Alf orations 

While testing an object program, it is often necessary 
to change or patch some of the original instructions. 
To do this, the sps source deck and the condensed deck 
must be updated each time an instruction is changed. 
If the SPS output is an uncondensed deck that is later 
condensed, it is necessary to update three card decks 
(the source, uncondensed, and condensed decks). The 
procedure described here provides an orderly, rapid, 
and accurate means of correcting the source program. 

Patch Card and Coding Sheet 

When an instruction requires correction, the corrected 
machine language instruction as well as the sps coding 
should be recorded on a patch coding sheet. The coding 
sheet shown in Figure 7 or a similar coding sheet can 
be used for this purpose. Each entry on the coding 
sheet is punched into a prepunched patch card. The 
prepunched data is arranged on the patch card as fol- 
lows: 

Columns 13 (0, 2, 8 punches) 
62-65 001" 

70 -(flag only) 



75 blank 

76 0 

77 9 

Use of Patch Cards 

Patch cards are placed in front of the last seven cards 
of the condensed object deck but no cards are removed 
or changed. The condensed object deck is loaded in the 
same manner as it was before the patch cards were 
added. 

Corrections to the Source Program 

After the object program is tested, the source program 
deck can be corrected by selecting patch cards with a 
code 9 in column 77 from the object deck. Card col- 
umns 14 through 61 in the selected cards should be 
reproduced into columns 1 through 48 of blank cards. 
The reproduced cards should then be inserted in page 
and line number sequence into the source program 
deck, and the cards that are being replaced should be 
discarded. 

Patch cards may then be returned to the condensed 
object deck or the source deck may be reassembled to 
produce a new object deck. 



Instruction in 
Machine Language 


SPS 


Actual 

Machine 

Location 


Actual 
Machine 
Locotion 
+ 12 


Patch 
Number 


Page 


Line 


Label 


OP 
Code 


Operands 


Column 1-12 


U-15 


16-18 


19-24 


25-28 


29-61 


65-69 


70-74 
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One Instruction Per Card 

Patch Cords Are To Be Placed In Front Of The Last Seven Cards Of The Condensed Deck» 









Figure 7. Patch Card Coding Sheet 
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Operating Procedures 



This section describes the procedures to be followed 
when using the 1620 sps iii Processor. 

Switches 

Both the Parity switch and the I/O switch should be 
placed in the stop position, and the Overflow switch in 
the PROGRAM position. Program switches for controlling 
the processor should be set as outlined in Table 13. 
Note ^ the diflFerent functions of the Program switches 
during the "Loading Processor — Pass 1 — Pass 2 —Post 
Assembly*' phases. 

Program Switch 1 

The processor is set up to punch the add table (re- 
quired for Model Is only) in the object program under 
control of Program Switch 1. Switch 1 is interrogated 
when the processor is being loaded, and, if the switch 
is oflF, the add table will be punched in the object pro- 
gram. If Program Switch 1 is on during loading of the 
processor, the add table will not be included in the 
object program. This option enables the 1620 Model 2 
user to load programs ( even with tra-tcd operations ) 
without loading over the area of the index registers. 
During loading, the message 

1620 SPS III, MODEL 1 
or 

1620 SPS III, MODEL 2 

is typed depending upon the setting of Program switch 
1. 

Loading ffte Processor 

(a) Card system 

1. Depress the console Reset key. 

2. Set Program switch 1 to the desired setting. 

3. Place the processor deck in the read hopper. 

4. Depress the Load key. 

(b) Paper Tape System 

1. Thread the processor tape on the paper tape 
reader. 

2. Depress the Reset and Insert keys. 

3. Set Program switch 1 to the desired setting. 

4. Enter 360000000300 from the typewriter, 

5. Depress the R-S key. 



Table 13. 1620 SPS III Program Switch Settings 





SWITCH 


POSIT 


ON 




NO. 


ON 


OFF 


LOADING 
PROCESSOR 


1 

2,3,4 


No add table will 
be punched in ob- 
ject program. 

Not used. 


Add table will be 
punched in ob- 
ject program. 


PASS 1 


1 


Input is from the 
cord reader or paper 
tape reader . 


Input is from 
typewriter. 




2 


The machine stops 
after an error mess- 
age has been typed 
so that corrected 
statement con be 
entered at the type- 
writer. 


Processing con- 
tinues after error 
message is typed, 
but error is ad- 
justed as describ- 
ed under ERROR 
CORRECTIONS. 




3 


Not used. 






4 


Turn on to correct 
typing error made 
while entering a 
statement^ and de*- 
press R~S key, 


^then off, and re- 
enter the entire 
statement at the 
typewriter. Leave 
off when assembl- 
ing program. 


PASS 2 


1 


The source statement 
and assembled in- 
struction is typed 
out. 


No listing is typed 




2 


Same as Pass 1 


Same as Pass 1 




3 


a. For card process- 
or, when the object 
program is to be in 
condensed form. 

b. Must be on for 
editing. 


For the cord pro- 
censsor, when the 
object program is 
to oe in unconden- 
sed form . 




4 


a. No object pro- 
gram will be punch- 
ed, b. Must be on 
for editing. 


The object pro- 
gram is punched. 


POST 

ASSEMBLY 


4 


Symbol table is not 
listed. 


Symbol table is 
listed. 



NOTES: 

1 . If listing anc(/or uncondensed output has just been obtained, 
set switch 3 ON to obtain condensed deck (re-enter source 
input). 

2. If edit just completed, set switch 4 OFF to obtain condensed 
deck (re-enter source input) . 

3. To re-enter Pass 1, turn switch 3 OFF (set switches 1, 2, and 
4 also, and load source input) . 



Upon completion of loadinjg, 48 will appear in the 
Operation Register. 

While the processor is being loaded, the size of the 
assembling machine is determined by programming. 
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The size of the object machine is set to the same size 
as that of the assembUng machine. When the processor 
is used on a system with more than 20,000 positions of 
core storage, the additional storage allows a larger area 
for source program labels and their assigned addresses. 

Processing the Source Program 

The processor is ready to start the assembly process as 
soon as the processor has been loaded. 

Pass 1 

(a) Card Input: 

1. Place program source deck in card reader 
hopper. 

2. Depress Reader Start key. 

3. Set Program switches ( see Table 13 ) . 

4. Depress the console Start key. 

(b) Paper Tape Input; 

1. Thread the input tape (source program). 

2. Set Program switches (see Table 13). 

3. Depress the console Start key. 

(c) Typewriter Input: 

1. Thread blank tape on tape punch or place 
blank cards in card punch and depress the 
Punch Start key (see Note below). 

2. Set Program switches (see Table 13). 

3. Type the source statement and follow it with 
a record mark. 

4. Depress the R-S key (repeat steps 3 and 4 
until all statements have been processed). 

At the completion of Pass 1, the message "END OF 
PASS F is typed out and the program halts. The proc- 
essor is ready to begin Pass 2. 

Note: Source statements entered on the typewriter 
during Pass 1 are outputted on paper tape if the tape 
processor is being used or outputted to cards if the 
card processor is being used. This output then becomes 
the input for Pass 2. 

Pass 2 

(a) Card Input: 

1. Place program source deck in the card reader 
hopper. 

2. Place blank cards in the punch hopper. 

3. Depress the Reader Start key and Punch 
Start key. 

4. Set Program switches (see Table 13). 

5. Depress console Start key. 

(b) Paper Tape input: 

1. Thread the input tape (source program) on 
the paper tape reader. 

2. Thread blank tape on the paper tape punch. 



3. Set Program switches (see Table 13). 

4. Depress console Start key. 

When Pass 2 is completed, the message 

LOAD SUBROUTINES 

will be typed out if subroutines are required by the 
source programs (see loading subroutines). If subrou- 
tines are not required, the message 

END OF PASS II 

is typed out. At the end of this message the symbol 
table is typed out if Program switch 4 is off. 

Typewriter Output 

With Program switch 1 on during Pass 2, the typewriter 
types each statement starting at the left margin. After 
the last character of each statement is typed, the type- 
writer carriage returns and tabulates into position for 
typing the storage address and assembled instruction. 
Statements are typed in the format in which they are 
entered; however, a space is inserted before and after 
the operation field. 

To set up the typewriter, the operator must: 

1. Set margins to the extreme right and left positions. 

2. Set a single tab stop at least 21 spaces to the left 
of the right margin. 

Symbol Table Typeout Format 

When the symbol table is typed, the labels and their 
assigned addresses are typed five to a line. The format 
of each address and label is as follows: 

Assigned 
Address Label 

xxxxx xxxxxx 
or 

xxxxx *xxxxxx 

where the leftmost position of the label contains the 
head character. Any true 6-character label is indicated 
by an asterisk in the leftmost position next to the 6-char- 
acter label. 

The symbol table typeout may be suppressed by 
turning Program switch 4 to the on position when the 
message 

END OF PASS II 

is being typed, or during the typeout of the symbol 
table. 
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Condensed Object Deck 

A condensed object deck can be obtained during Pass 2 
of the card processor by having Program switch 3 in the 
ON position and switch 4 in the off position. If uncon- 
densed output is obtained during Pass 2, condensed 
output can also be obtained (without reloading the 
processor) by: 

1. Setting Program switch 3 to the on position. 

2. Placing the program source deck in the card 
reader hopper. 

3. Depressing the Reader Start and Punch Start keys. 

4. Depressing the console Start key. 

Loading Subroutines 

Subroutines must be loaded after the message 
LOAD SUBROUTINES 

is typed out. Only those subroutines used by the object 
program are punched out as part of the object program. 
To load subroutines from Paper Tape input: 

1. Thread the subroutine tape. 

2. Depress the console Start key. 
Card Input: 

1. Place the subroutine card deck in the card reader 
hopper. 

2. Depress the Reader Start key. 

3. Depress the console Start key. 

Errors that occur while the subroutine deck (or 
tape) is being processed cannot be corrected by man- 
ual intervention because any information inserted in 
locations 00000 through 00099 will result in erroneous 
address modification. 

If the subroutine being processed is a variable man- 
tissa length subroutine, the message 

ENTER MANTISSA LENGTH 

is typed and the program halts. The operator enters 
the two-digit number from the typewriter. The range 
of the number to be entered is from 02 to 45. If no num- 
ber is entered, the mantissa length is automatically 
set to 08. The R-S key must be depressed to continue 
processing. Table 10 shows the identification numbers 
and storage requirements for the subroutines provided 
with SPS III and sps in for Printer. The identification 
number is punched in column 77 of the subroutine card 
decks and is punched in the leader of the subroutine 
tapes. Subroutine secondary linkages are typed out 
(printed with 1630-1443 SPS III) as the subroutines 
are added to the object deck. 
After the subroutines are processed, the message 



END OF PASS II 



is typed out. 



Editing the Source Program 

When a large program is to be assembled, the operator 
may choose to perform an edit operation prior to actual 
assembly of the object program. During the edit oper- 
ation, error messages are typed out for Passes 1 and 2, 
no listing is typed, and no object program is punched. 
For this reason, edit data may be obtained in less time 
than is required for normal assembly. The error listings 
from the operation enable the programmer to correct 
the program prior to assembhng the object program. 

The operating procedures are the same as those for 
passes 1 and 2 described for a normal assembly except 
that Program switches 3 and 4 (see Table 13) must be 
on during Pass 2. 



Error Messages 

The error message codes that might be typed out on the 
typewriter during Pass 1 and/or Pass 2 of an assembly 
are listed in numerical sequence. 

Error 
Message 

Code Description of Error 

ERl A record mark is in the label or operation 
code field. 

ER2 For address adjustment, a product greater 
than ten digits has resulted from a multi- 
plication. 

ER3 An invalid operation code has been used. 
ER4 A dollar sign, which is being used as a head 

indicator, is incorrectly positioned in an 

operand. 

ER5 1. A symbolic address contains more than 
six characters. 

2. An actual address contains more than five 
digits. 

3. An undefined symbolic address is used in 
an operand. 

4. A HEAD ( $ ) character is improperly speci- 
fied. 

5. More than six characters precede the 
number in the index register field. 

6. Improper position of left or right index 
register parenthesis. 

7. Index register > 7 specified. 

8. Non-numeric index register specified. 
ER6 A DSA statement has more than ten operands. 
ER7 A DSB statement has the second operand 

missing. 

ER8 1. A DC, DSC, DAC, or dnb has a specified 
length greater than 50. 
2. A DC, DSC, or DAC statement has no con- 
stant specified. 



62 



3. A DC, or DSC has a constant which has a 
greater number of digits than its specified 
length. 

4. A DAC statement has a specified length 
not equal to the number of characters in 
the constant itself. 

ER9 The symbol table is full. 
ERIO A duplicate label is defined (defined more 
than once ) . 

ERll An assembled address is greater than five 
digits. 

ER12 An invalid special character is used as a 

head character in a head statement. 
ER13 A HEAD statement operand contains more 

than one character. 
ER14 An invalid special character is used in a 

label. The eight invalid special characters 

are: "blank) -f$*~, An all-numerical 

label is also invalid. 

Error messages are in the following form: 



LABEL 



adjustment 
count 



xxxxxx + xxxx 



error 
code 

ERn 



Where label refers to the last defined label and the 
"adjustment count" refers to the number of statements 
between the label and the statement in error. If the first 
statement of a source program contains the label start, 
and the second statement has an error "ERl," the fol- 
lowing message will be typed: 

START -t- 0001 ERl 

If the second statement has the label XYZ, the mes- 
sage still would appear as start -f 0001, not as xyz -h 
0000. 

The messages will appear in the form just shown 
during Pass 1 or Pass 2, if Program switch 1 is off. If 
Program switch 1 is on during the second pass, only 
the error code "ERn" will be typed opposite the state- 
ment in error, at the right-hand side of the page. 

Error Correction 

Each erroneous statement can be corrected individu- 
ally after the error message is typed and the machine 
is halted or all statements containing errors can be cor- 
rected after the object program is assembled. If there 
are few errors, the first procedure may be advisable; 
where there are many errors, it is advisable to correct 
the source deck at the end of the run and reassemble 
the program. 



Some errors in source statements entered from cards 
or tape on Pass 1 are detected again during Pass 2. 
Therefore, they must be corrected twice. If errors in 
source statements entered from the typewriter on Pass 
1 are corrected, they do not have to be corrected dur- 
ing Pass 2, since the output of Pass 1 becomes the input 
to Pass 2 and contains the corrected statement. 

Program Switch 2 On 

With Program Switch 2 on, the processor stops after 
typing the error message and the carriage returns. The 
operator enters the corrected statement and depresses 
the R-S key. 

Program Switch 2 Off 

With Program Switch 2 off, the processor does not stop 
for an error; however, errors can be corrected after as- 
sembly. Errors affect the assembly process as indicated 
in the following list. 



Error 
Code 

ERl, ER3 



ER2, ER4, 
ERll 

ER5 



ER6 
ER7 

ER8 



ER9, ERIO, 
ER14 
ER12 

ER13 



Assembly Process 

A NOP instruction (410000000000) is as- 
sembled. 

The label is treated as a blank. 

The operand is assembled as 00000 
( zero ) address. 

1-6. The operand is assembled as an ab- 
solute 00000. 

7, 8. Operand is assembled, but no index 
register flags are set. 

The first ten operands are assembled; 
those over ten are ignored. 

The statement is assembled in the same 
manner as a ds statement with a length 
of 50. 

If the operation code is: 

DC — it is assembled in the same manner 

as a DS statement with a length of 50. 
DSC — it is assembled in the same manner 

as a Dss statement with a length of 50. 
DAC — it is assembled in the same manner 

as a DAS statement with a length of 50. 
DNB — it is assembled as a dnb with a 

length of 50. 
The label is treated as blank. 

The head character is replaced by a blank 
character. 

The first non-blank character specified in 
the operand is used as the head char- 
acter. 
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1620-1443 SPS III 



1620-1443 SPS lu is a printer-oriented version of the 
1620 SPS III previously described in this manual, ibm 
1620-1443 SPS in contains mnemonics for printer opera- 
tion codes; during assembly, the source statements 
Rtid assembled instructions can be listed on the printer. 
The printer instructions and unique mnemonics are 
given in the following examples. The programmer need 
not be concerned with the actual Q-address modifiers 
when coding with the sps language. 

V 

Examples 



latMt 
i ...'! 


1» IS 


Oparonds & il«merki 

•> JO .« M » 40 45 M » « 
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The operand data represents the storage address of 
data to be printed, the operand control codes ( 2, 5, 3, 3 ) 
are taken from Tables 14 and 15 for carriage skipping 
and spacing, respectively. 



Operating Procedures 

Only the operating procedures and messages that are 
different from those described for 1620 sps ni are given 
in this section. 

During loading of the 1620-1443 sps hi processor pro- 
gram, the message 

1620 SPS III FOR PRINTER, MODEL 1 
or 

1620 SPS III FOR PRINTER, MODEL 2 

is typed out at the console typewriter, depending on 
the setting of Program Switch 1. Switch 1 should be 
set to the on position if the object program is to be 
executed on a 1620 Model 2; Switch 1 should be set to 
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Table 14. Carriage Skip Operations ( Q Address ) Control 
Codes 



CONTROL CODES 


ACTUAL 


MODIFIERS 


IMMEDIATE 


AFTER PRINTING 
(DELAY) 


Skip t-o Channel 1 


71 


41 


2 


72 


42 


3 


73 


43 


4 


74 


44 


5 


75 


45 


6 


76 


46 


7 


77 


47 


8 


78 


48 


9 


79 


49 


10 


70 


40 


11 


33 


03 


12 


34 


04 



the OFF position if the object of the program is to be 
executed on a 1620 Model 1. 

With Program Switch 1 on during Pass 2, the state- 
ments and assembled instructions are printed on the 
1443 Printer. The assembled instruction is printed start- 
ing at the left margin and the source statement is print- 
ed to the right of the assembled instruction. Statements 
are printed in the same format as they are entered ex- 
cept that spaces are inserted between the mnemonic 
and P operand, and between the P and Q operands to 
aid in the readability of the listings. 

Output Change 

Only a condensed object deck (or tape) can be ob- 
tained from 1620-1443 sps hi. The list deck or "one- 
instruction-per-card" output is not produced since the 
listing can be obtained during the processing of the 
source program. 

Symbol Table Listing 

At the conclusion of Pass 2, the symbol table can be 
listed on the printer. The labels and their assigned ad- 



Table 15. Carriage Space Operations ( Q Address ) Control 
Codes 



CONTROL CODES 


ACTUAL Q|Q 


Qll MODIFIERS 


IMMEDIATE 


AFTER PRINTING 
(DELAY) 


Number of Spaces 1 


51 


21 


2 


52 


62 


3 


53 
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dresses are printed five to a line in the same format as 
that described for sps hi. 

Error Messages 

All error messages are still typed out oti the typewriter 
for the convenience of the operator. The only descrip- 
tion for error messages that changes is that for ER2. 
The description is expanded to include "printer con- 
trol operation code was improperly specified." With 
Program switch 2 off, the Q operand is assembled as 
00900. 

Table 16 shows the Program Switch settings for 1620- 
1443 SPS III. 

Printer Operation 

To set up the printer, the operator must: 

1. Prepare a carriage control tape with putiches in 
channel 1 where printing is to start and channel 12 
where printing is to stop on the page. Place the 
tape on the carriage tape drive. 

2. Put forms in the printer and adjust forms so that 
the print bar is set where printing is to begin on 
the page. 

3. Disengage the carriage clutch and depress the 
Carriage Restore key to position the carriage tape 
at channel 1. 

4. Engage the carriage clutch and depress the Printer 
Start key. 



Table 16. 1620-1443 SPS III Program Switch Settings 







POSITION 




NO. 


ON 


OFF 


LOADING 
PROCESSOR 


1 

2,3,4 


No add table will 
be punched in ob- 
ject program. 

Not used. 


Add table will be 
punched in object 
program. 


PASS 1 


1 


Input is from the 
card reader or papei 
tape reader . 


Input is from type- 
writer. 




2 


The machine stops 
after an error mess~ 
age has been typed, 
so that conrected 
statement can be 
entered at the type- 
writer . 


Processing continues 
after error message 
is typed, but error 
is adjusted as des- 
cribed under ERROR 
CORRECTIONS. 




3 


Not used. 






4 


Turn on to correct 
typing error made 
while entering a 
statement, and 
depress R-S key, -J 


►then off, and re- 
enter the entire 
statement at the 
typewriter. Leave 
off when assembling 
program . 


PASS 2 


1 


The source state- 
ment and assembled 
instruction is print- 
ed. 


No listing is 
printed. 




2 


Same as Pass 1 


Same as Pass 1 




3 


Not used. 






4 


a. No object pro- 
gram will be punch- 
ed, b. Must be 
on for editing. 


The object program 
is punched. 


POST 

ASSEMBLY 


4 


Symbol table is 
not listed. 


Symbol table is 
listed. 



NOTES: 

1. After Pass 2 is completed, a 48 oppears in the operation register. 
Depression of the Start key sends control to Pass 1 again. 
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Index 



Page 

Add (A) instruction 16 

Add Immediate (AI) instruction 16 

Adding macro-instructions to processor 46, 47 

Adding subroutines 44, 46 

Address Adjustment 8 

Addresses 

actual 7 

asterisk 7 

symbolic 7 

Alpha 48 

AND to Field (ANDF) instruction 17 

Any Data Check code 19 

Arithmetic instructions 16 

Arithmetic subroutines 30 

Asterisk (special character) 4 

At (@) sign (special character) 6 

Backspace Typewriter (BKTY) instruction 24 

Beta 48 

Blank 

special character 5 

defining (DNB) 14 

Branch and Load Index Register 

Immediate (BLXM) instruction 21 

Branch and Load Index Register 

(BLX) instruction 21 

Branch and Store Index Register 

(BSX) instruction 21 

Branch and Transmit Address 

Immediate (BTAM) instruction 20 

Branch and Transmit Address 

(BTA) instruction 20 

Branch and Transmit (BI) instruction 20 

Branch and Transmit Floating 

instruction (BTFL) 20 

subroutine (BTFS) 40 

Branch and Transmit Immediate 

(BTM) instruction 20 

Branch and Select Band A (BSBA) instruction 20 

Branch and Select Band B (BSBB) instruction 20 

Branch Conditionally, Modify Index 

Register (BCX) instruction 20 

Branch and Modify Index Register (BX) instruction 20 

Branch and Modify Index Register 

Immediate (BXM) instruction 20 

Branch and Select ( BS ) instructions 20 

Branch and Select Indirect Addressing (BSIA) instruction . . 20 

Branch and Select No I/A (BSNI) instruction 20 

Branch and Select No Index Register ( BSNX ) instruction . . 20 

Branch Any Data Check ( BA ) instruction 18 

Branch Back (BB) instruction 20 

Branch Band A Not Selected (BANS) instruction 19 

Branch Band A Selected (BBAS) instruction 18 

Branch Band B Not Selected (BBNS) instruction 19 

Branch Band B Selected (BBBS) instruction 18 

Branch Conditionally, Modify Index Register 

Immediate (BCXM) instruction 21 



Page 



Branch Console Switch instructions 

(BCl, BC2) 18 

(BC3, BC4) 19 

Branch Either Band Selected (BEBS) instruction 19 

Branch Exponent Check (BXV) instruction 19 

Branch Equal (BE) instruction 18 

Branch High (BH) instruction 18 

Branch Indicator (BI) instructions 18 

indicator codes summary 21 

switch codes summary 21 

Branch Instructions 18 

Branch Last Card ( BLC ) instruction 19 

Branch Low (BL) instruction 19 

Branch Negative (BN) instruction 19 

Branch Neither Band Selected ( BNBS ) instruction 18 

Branch No Flag (BNF) instruction 18 

Branch No Group Mark (BNG) 18 

Branch No Indicator (BNI) instruction 19 

indicator codes summary 21 

switch codes summary 21 

Branch No Overflow (BNO) instruction 19 

Branch No Record Mark (BNR) instruction 18 

Branch Not Any Data Check (BNA) instruction 19 

Branch Not Equal (BNE) instruction 19 

Branch Not Exponent Check (BNXV) instruction 20 

Branch Not High ( BNH ) instruction 19 

Branch Not Last Card (BNLC) instruction 19 

Branch Not Low (BNL) instruction 18 

Branch Not Negative (BNN) instruction 18 

Branch Not Positive (BNP ) instruction 19 

Branch Not Zero ( BNZ ) instruction 19 

Branch on Bit (BBI) instruction 21 

Branch on Channel 9 ( BCH9 ) instruction 19 

Branch on Channel Overflow (BCOV) instruction 19 

Branch on Digit (BD) instruction 18 

Branch on Mask ( BMK ) instruction 21 

Branch Overflow (BV) instruction 18 

Branch Positive (BP) instruction 18 

Branch Zero (BZ) instruction 18 

Card Input 61 

Carriage Control Codes, printer 65 

Clear Flag (CF) instruction 26 

Coding Sheet 1, 2 

Comma (special character) 4 

Compare (C) instruction 18 

Compare Immediate ( CM ) instruction 18 

Complement Octal Field (CPLF) instruction 17 

Condensed object deck 

format 57 

alterations 59 

how to obtain 62 

Control Codes 

input/output instructions 25 

carriage, printer 64 

Control (K) instruction 24 

Control Statements 

DEND 25 
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Page 

DORG 22 

HEAD 27 

SEND 26 

TRA 28 

TCD 28 

Core storage layout 53 

Data transmission subroutines 30 

Declarative operations 

card format 55 

codes 10 

functions 10 

Decimal to Octal Conversion (DTO) instruction 17 

Define Alphameric Constant (DAC) statement 13 

output card format 56 

Define Alphameric Symbol ( DAS ) statement 11 

output card format 55 

Define Constant (DC) statement 11 

output card format 56 

Define END (DEND) statement 25 

Define ORIGIN (DORG) statement 22 

Define Numerical Blank (DNB) statement 14 

output card format 56 

Define Special Constant (DSC) statement 12 

output card format 56 

Define Special Symbol (DSS) statement 11 

output card format 55 

Define Symbol (DS) statement 10 

output card format 55 

Define Symbolic Address (DSA) statement 13 

output card format 55 

Define Symbolic Block ( DSB ) statement 14 

output card format 55 

Divide instruction (D) 16 

Divide Immediate (DM) instruction 16 

Divisor, positioning of 38 

Dollar sign (special character) 6 

Dump Numerically ( DN ) instruction 23 

Dump Numerically Card ( DNCD ) instruction 23 

Dump Numerically Paper Tape ( DNPT ) instruction 23 

Dump Numerically Typewriter (DNTY) instruction 23 

Duplicate Symbols (labels) 27 

Editing source programs 62 

End-of-line character 5 

Equal sign ( special character ) 3 

Error Correction 63 

Error Messages 

processor 62 

subroutine 43, 44 

Evaluation of arguments (subroutines) 29 

Exclusive OR to Field (EORF) instruction 17 

Exponent, defined 33 

Field 2 

Flag indicator operand 6 

Floating Add 

instruction (FADD) 16 

subroutine (FA) 36 

Floating Arctangent subroutine 41 

Floating Cosine subroutine 41 

Floating Divide 

instruction (FDIV) 16 

subroutine ( FD ) 37 

Floating Exponential ( Base 10 ) subroutine 42 



Page 

Floating Exponential ( Natural ) subroutine 42 

Floating Logarithm (Base 10) subroutine 43 

Floating Logarithm ( Natural ) subroutine 42 

Floating Multiply 

instruction (FMUL) 16 

subroutine (FM) 36 

Floating Point Arithmetic 32 

Fixed Point Divide subroutine 37 

Floating Shift Left 

instruction (FSL) 17 

subroutine (FSLS) 39 

Floating Shift Right 

instruction (FSR) 17 

subroutine (FSRS) 38 

Floating Sine subroutine 40 

Floating Square Root subroutine 40 

Floating Subtract 

instruction (FSUB) 16 

subroutine (FS) 36 

Format, output 

condensed 57 

patch card 59 

uncondensed 54 

Functional subroutines 30 

Halt ( H ) instruction 26 

Header card format, subroutine 44 

Heading ( HEAD ) statement 27 

Heading line, coding sheet 2 

Immediate-type instructions 6 

Imperative statements 14 

Index Registers ^ 9 

Index Typewriter (IXTY) instruction 34 

Indicator codes 

(branch instructions) 21 

Indirect addressing 30 

Input and Output Unit Codes 

Table 7 25 

Input and Output Statements 22-25 

Internal Data Transmission statements 16, 17 

Label, coding sheet 3 

Library change card 46 

Line number, coding sheet 2 

Linkages, subroutine . 48 

Load Dividend Immediate ( LDM ) instruction 16 

Load Dividend ( LD ) instruction 16 

Loading the processor 60 

Location assignment counter 10, 15 

Logic statements 17-21 

Machine requirements iv 

Macro-instructions, subroutine 30 

Mantissa 

defined 33 

entering length 62 

MAR Check Indicator code 21 

Mask Digit operand 6 

Miscellaneous statements 22, 26 

Messages 

processor 62 

subroutine 43, 44 

Move Address ( MA ) instruction 17 

Move Flag ( MF ) instruction 26 
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?age 



uncondensed 54 

Object program 1 

Octal to Decimal Conversion ( OTD ) instruction 17 

Operands and Remarks, coding sheet 3 

Operands 

Flag 6 

Immediate (Q operand) 6 

Mask Digit 6 

Modification 9, 49 

Operating procedures 

1620 SPS III 60 

1620-1443 SPS III 64 

Operation code field, coding sheet 3 

OR to Field (ORF) instruction 17 

Output Unit Codes 25 

Overflow, exponent 34 

Page number, coding sheet 2 

Parenthesis (special character) 5 

Paper tape input 61 

Patching source programs 59 

Period (special character) 3 

Pick, subroutine 31, 35 

bypassing 49 

functions 48 

address equivalents 49 

Print Alphamerically ( PRA ) instruction 24 

Print Alphamerically and Suppress Spacing 

(PRAS) instruction 24 

Print Numerically and Suppress Spacing 

(PRNS) instruction 23 

Print Numerically (PRN) instruction 23 

Printer Dump and Suppress Spacing ( PRDS ) instructions ... 23 

Printer Dump (PRD) instruction 23 

Printer Operation 65 

Processor Control statements 

DEND 25 

DORG 22 

HEAD 27 

SEND 26 

TRA 28 

TCD 28 

Processor program 

1620 SPS III 52 

1620-1443 SPS III 64 

Product area 37 

Program switch settings 

1620 SPS III 60 

1620-1443 SPS III 65 

Q address, disk instructions 25 

Quotient address 37 

Read Alphamerically Card ( RACD ) instruction 24 

Read Alphamerically Paper Tape ( RAPT ) instruction 24 

Read Alphamerically ( RA ) instruction 23 
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. 24 
. 23 
. 23 
. 23 
. 23 
. 12 
. 24 



Secondary linkage format 48 

Set Flag (SF) instruction 26 

Skip After Printing (SKAP) instruction 24 

Skip Immediate (SKIP) instruction 24 

Slash ( special symbol ) 3 

Source program 

assembling 61 

card 3 

defined 5 

editing 62 

patching ( altering ) of 59 

Space After Printing ( SPAP ) instruction 25 

Space Immediate (SPIM) instruction 25 

Space Typewriter (SPTY) instruction 34 

Special characters 

Asterisk 4 

At @ sign 6 

Blank 5 

Comma 4 

Dollar sign 6 

Equal sign 3 

End-of-Iine character 5 

parenthesis 5 

period 3 

slash 3 

Special END ( SEND ) statement 26 

Statement writing 4 

Statements, 

Control 22 

Declarative 10, 15 

Imperative 14 

Arithmetic 14, 16 

Internal Data Transmission 16, 17 

Input and Output 22-25 

Logic 17-21 

Miscellaneous 22, 26 

Storage layout, processor 52, 53 

Subroutines 
Adding 

to card 44 

to paper tape 46 

Arithmetic 30 

Data Transmission 30 

Error Messages 43, 44 

Functional 30 

Header card format 44 

Library change card 46 

Linkages 48 

Macro-instructions 30 

Sample 45 

Storage requirements 35 

Trailer card format 45 

Writing 48 

Subtract Immediate ( SM ) instruction 16 

Subtract (S) instruction 16 



Multiply Immediate (MM) instruction 16 

Multiply (M) instruction 16 

N digit 33 

No Operation ( NOP ) instruction 26 

Normalized, defined 33 

Object deck 

condensed 57 



Read Alphamerically Typewriter (RATY) instruction 

Read Binary Paper Tape ( RBPT ) instruction 

Read Numerically Card ( RNCD ) instruction 

Read Numerically Paper Tape ( RNPT ) instruction . . 

Read Numerically (RN) instruction 

Read Numerically Typewriter ( RNTY ) instruction . . 

Record Mark 

Return Carriage Typewriter (RCTY) instruction . . 



68 



?age 



Symbol table 52 

capacity 54 

listing 64 

Tabulate Typewriter ( TBTY ) instruction 34 

Tape Modifier program 46 

Trailer card format, subroutine 45 

Transfer Control and Load (TCD) 

instruction 28 

card format 55 

Transfer Numerical Fill (TNF) instruction 17 

Transfer Numerical Strip ( TNS ) instruction 17 

Transfer to Return Address (TRA) 

instruction 28 

card format 55 

Transmit Digit (TD) instruction 17 

Transmit Digit Immediate ( TDM ) instruction 17 

Transmit Field (TF) instruction 17 

Transmit Field Immediate (TFM) instruction 17 

Transmit Floating 

instruction (TFL) 17 

subroutine (TFLS) 39 



Vage 

Transmit Record ( TR ) instruction 17 

Transmit Record No Record Mark 

(TRNM) instruction 17 

Typewriter input 61 

Uncondensed output 54 

Underflow, exponent 34 

Variable lenth, defined 29 

Variable length mantissa subroutine 29 

Wiring diagrams for 407 listing of object programs ..... 57, 58 

Write Alphamerically Card ( WACD ) instruction 24 

Write Alphamerically Paper Tape ( WAPT ) instruction .... 24 

Write Alphamerically Typewriter ( WATY ) instruction .... 24 

Write Alphamerically ( WA ) instruction 24 

Write Binary Paper Tape (WBPT) instruction 24 

Write Numerically Card (WNCD) instruction 23 

Write Numerically Paper Tape (WNPT) instruction 23 

Write Numerically Typewriter (WNTY) instruction 23 

Write Numerically (WN) instruction 23 

Writing subroutines 48 
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